cho dãy a có N số nguyên a1,a2…aN hãy cho biết trong dãy có bao nhiêu số chẵn

0 bình luận về “cho dãy a có N số nguyên a1,a2…aN hãy cho biết trong dãy có bao nhiêu số chẵn”

1. Trả lời:

   

   Bình luận

2. uses crt;
   var i,n,t:longint; a:array[1..1000000]of longint;
   begin
   clrscr;
   write(‘n=’);readln(n);
   for i:=1 to n do
       begin
          write(‘a[‘,i,’]=’);readln(a[i]);
          if a[i] mod 2=0 then inc(t);
       end;
   writeln(T);
   readln;
   end.

   Bình luận