Cho dãy A thuộc N số nguyên a1, a2, -aN Trình bày thuật toán bém số lượng các số là bội số của 2
1 câu trả lời
program tinhtsoboi2;
uses crt;
var i,n,s:real;
a:array[1..100] of integer;
begin
clrscr;
s:=0;
writeln('nhap so phan tu cua day so A',n); readln(n);
for i:= 1 to n do
begin
write('A[',i,']=');readln(A[i]);
end;
if a[i] mod 2 then
s:=S+1;
writeln('so luong cac so trong day la boi cua 2 la',s);
readln
end.
Câu hỏi trong lớp
Xem thêm
