Cho dãy A gồm N số nguyên a1,a2…an trình bày thuật toán đưa ra số lượng các số chẵn có trong dãy đã cho 25/08/2021 Bởi Anna Cho dãy A gồm N số nguyên a1,a2…an trình bày thuật toán đưa ra số lượng các số chẵn có trong dãy đã cho
program Kookie; uses crt; var d, i, N : integer; begin clrscr; write(‘ nhap vao so phan tu cua day A là :’); readln(N); for i:=1 to N do if A[i] mod 2 = 0 then d := d+1; writeln(‘ so ca so chan la :,’d); readln end. Bình luận
program Kookie;
uses crt;
var d, i, N : integer;
begin
clrscr;
write(‘ nhap vao so phan tu cua day A là :’);
readln(N);
for i:=1 to N do
if A[i] mod 2 = 0 then
d := d+1;
writeln(‘ so ca so chan la :,’d);
readln
end.