K
Khách

Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.

23 tháng 12 2020

Lời giải :

B1: nhập 2 biến x,y

B2: Nếu x>y tráo đổi gía trị của x và y, chuyển đến bước 3 . Nếu y > x thì 2 số đã theo thứ tự có giá trị không giảm , chuyển đến bước 3

B3: In ra kết qủa x, y và kết thúc thuật toán 

17 tháng 12 2020

1: Hoán đổi giá trị hai biến x và y

Chúng ta sẽ gán biến trung gian tam cho x, xong rồi gán biến trung gian tam đó cho y; rồi sau đó gán y ngược lại cho x, và xuất kết quả ra-đó chính là x và y sau khi hoán đổi cho nhau.

2: Tìm giá trị lớn nhất của dãy A

Chúng ta sẽ gán biến ln cho a[1], sau đó sẽ quét qua các phần tử trong mảng xem thử có phần tử nào lớn hơn ln thì gán ln cho phần tử đó. Sau cùng xuất ln ra, ta được số lớn nhất cần tìm.

Ví dụ 6. Tìm số lớn nhất trong dãy A các số a1, a2, ..., an cho trước.Ta sẽ dùng biến MAX để lưu số lớn nhất của dãy A. Việc xác định MAX có thể được thực hiện như sau: Đầu tiên gán giá trị a1 cho biến MAX. Tiếp theo, lần lượt so sánh các số a2, ..., an của dãy A với MAX. Nếu ai> MAX, ta gán ai cho MAX.INPUT: Dãy A các số ai, a¿, ..., a„ (n >]).OUTPUT: Giá trị MAX = max{ay, 4ạ,..., a„Ì.Từ đó, ta có thuật toán...
Đọc tiếp

Ví dụ 6. Tìm số lớn nhất trong dãy A các số a1, a2, ..., an cho trước.

Ta sẽ dùng biến MAX để lưu số lớn nhất của dãy A. Việc xác định MAX có thể được thực hiện như sau: Đầu tiên gán giá trị a1 cho biến MAX. Tiếp theo, lần lượt so sánh các số a2, ..., an của dãy A với MAX. Nếu ai> MAX, ta gán ai cho MAX.

INPUT: Dãy A các số ai, a¿, ..., a„ (n >]).
OUTPUT: Giá trị MAX = max{ay, 4ạ,..., a„Ì.
Từ đó, ta có thuật toán sau:
Bước 1. MAX← a1; i←1.
Bước 2. Nếu ai> MAX, gán MAX← ai.
Bước 3. i←i+ 1.
Bước 4. Nếu i≤n, quay lại bước 2.
Bước 5. Thông báo giá trị MAX và kết thúc thuật toán.

Dưới đây minh hoạ thuật toán trên với trường hợp chọn thỏ nặng nhất trong bốn chú thỏ có trọng lượng tương ứng là 2, 1, 5, 3 ki-lô-gam.

0
Ví dụ 6. Tìm số lớn nhất trong dãy A các số a1, a2, ..., an cho trước.Ta sẽ dùng biến MAX để lưu số lớn nhất của dãy A. Việc xác định MAX có thể được thực hiện như sau: Đầu tiên gán giá trị a1 cho biến MAX. Tiếp theo, lần lượt so sánh các số a2, ..., an của dãy A với MAX. Nếu ai> MAX, ta gán ai cho MAX.INPUT: Dãy A các số a1, a2, ..., an (n >1).OUTPUT: Giá trị MAX = max{a1, a2,..., an}.Từ đó, ta có thuật toán...
Đọc tiếp

Ví dụ 6. Tìm số lớn nhất trong dãy A các số a1, a2, ..., an cho trước.

Ta sẽ dùng biến MAX để lưu số lớn nhất của dãy A. Việc xác định MAX có thể được thực hiện như sau: Đầu tiên gán giá trị a1 cho biến MAX. Tiếp theo, lần lượt so sánh các số a2, ..., an của dãy A với MAX. Nếu ai> MAX, ta gán ai cho MAX.

INPUT: Dãy A các số a1, a2, ..., an (n >1).
OUTPUT: Giá trị MAX = max{a1, a2,..., an}.
Từ đó, ta có thuật toán sau:
Bước 1. MAX← a1; i←1.
Bước 2. Nếu ai> MAX, gán MAX← ai.
Bước 3. i←i+ 1.
Bước 4. Nếu i≤n, quay lại bước 2.
Bước 5. Thông báo giá trị MAX và kết thúc thuật toán.

Dưới đây minh hoạ thuật toán trên với trường hợp chọn thỏ nặng nhất trong bốn chú thỏ có trọng lượng tương ứng là 2, 1, 5, 3 ki-lô-gam.

0
23 tháng 12 2018

tổng của 100 số đt:

var i,b:integer;

begin

b:=0;

for i:=1 to 100 do

b:=b+i;

writeln('Tong cua 100 so dt:', b);

readln;

end.

11 tháng 2 2020

tổng của 100 số đt:

var i,b:integer;

begin

b:=0;

for i:=1 to 100 do

b:=b+i;

writeln('Tong cua 100 so dt:', b);

readln;

end.

11 tháng 12 2021

#include <bits/stdc++.h>

using namespace std;

long long x,n,i,t;

int main()

{

cin>>n;

t=0;

for (i=1; i<=n; i++)

{

cin>>x;

if (x>0) t=t+x;

}

cout<<t;

return 0;

}

23 tháng 12 2020

Bước 1: Nhập n và nhập dãy số

Bước 2: ln←0; i←1

Bước 3: Nếu ln<a[i] thì ln←a[i];

Bước 4: i←i+1;

Bước 5: Nếu i<=n thì quay lại bước 3

Bước 6: Xuất ln

Bước 7: Kết thúc

1 tháng 4 2021

uses crt; var i,n,a,b, uc,bcnn:integer ;

c:array[1..100] of integer;

{--- CTC tim UCLL hai so} function ucln(a,b:integer):integer;

var r:integer;

begin r:=a mod b;

while r<>0 do begin a:=b; b:=r; r:= a mod b;

end;

ucln:=b;

end;

{--- CTC chinh----} begin Write('n= ');

readln(n);

for i:=1 to n do begin write('c[',i,']=');

readln(c[i]);

end;

for i:= 1 to n do

Write(c[i]:3);

writeln;

uc:=ucln(c[1], c[2]);

bcnn:=(c[1]*c[2])div uc;

for i:=3 to n do begin uc:=ucln(uc,c[i]);

bcnn:= bcnn*c[i] div uc;

end;

Writeln('bcnn =',bcnn); readln; end.

1 tháng 4 2021

var i,n,min,max:integer;

a:array[1..1000] of integer;

begin

Write('n=');read(n);

for i:=1 to n do

Read(a[i]);

i:=1;

max:=0;

min:=a[i];

while i<n do 

Begin

if a[i] > max then max:=a[i];

if a[i] <min then min:=a[i];

i:=i+1;

end;

writeln('Gia tri LN la:',max);

writeln('Gia tri NN la:',min);

readln;

end.