A)Tìm phần tử lớn nhất của dãy số nguyên gồm n số a1, a2,..an B) Sao chép những số nguyên là số chẵn trong câu a sang mảng có tên là SOCHAN
1 câu trả lời
pascal :
khai báo :...
tự nhập n và mảng a
a,longint ma=-1000000000;
for i:=1 to n do
if(ma<a[i]) then ma=a[i];
writeln(ma);
b,
longint res=0;
for i:=1 to n do
if(a[i] mod 2 =0) then SOCHAN[++res]=a[i];
for i:=1 to res do writeln(SOCHAN[i]);
