Ý tưởng: 2 số có tổng lớn nhất là 2 số lớn nhất trong chương trình
uses crt;
var a:array[1..100]of integer;
i,n,t,tam,j:integer;
begin
clrscr;
write('n='); readln(n);
for i:=1 to n do
begin
write('a[',i,']='); readln(a[i]);
end;
{----------------------xu-ly-----------------------------}
for i:=1 to n-1 do
for j:=i+1 to n do
if a[i]<a[j] then
begin
tam:=a[i];
a[i]:=a[j];
a[j]:=tam;
end;
writeln('hai so co tong lon nhat trong day la: ',a[1],' va ',a[2]);
readln;
end.
Cho dãy gồm N số nguyên A1, A2, An. Hãy trình bày thuật toán tính và hiển thị tổng các số dương có trong dãy đã cho?
Cho số N nguyên dương và dãy số nguyên A gồm a1, a2,.....,an.
Hãy viết thuật toán
a) đưa ra màn hình tổng số các giá trị trong dãy
(Ví dụ: nhập n=4
Dãy A: 3 6 2 1 đưa ra màn hình tổng số bằng 12 <dạng> )
b) Đưa ra màn hình vị trí chứa giá trị lớn nhất. Nếu có 2 GTLN thì dưa ra vị trí nhỏ nhất chứa GTLN.
cho số nguyên dương n và dãy số a gồm n số a1,a2,,,,,an tính hiển thị tổng các số nguyên âm lẽ trong dãy số a đã cho
a xác định bài toán
b trình bài ý tưởng
c viết thuật toán
d mô phỏng bài toán
Cho dãy số nguyên với N=3 và dãy số nguyên a1=4, a2=6, a3=9. Tìm giá trị lớn nhất của dãy số.
1, Cho dãy A gồm N số nguyên a1,a2...aN. Hãy cho biết trong dãy có bao nhiêu số chẵn?
2, Cho N và dãy a1,a2...aN là dãy các số nguyên. Hãy cho biết trong dãy có bao nhiêu số âm
cho dãy A gồm n số nguyên a1 a2 an và 1 số k tìm và đưa ra vị trí i mà ai bằng k
Cho dãy A gồm N số nguyên A1 A2 An tính tổng các số hạng là bội của 2 trong dãy đã cho
