cho dãy A gồm a1,a2,-.an và N là số nguyên dương. 3 chia hết cho số nào trong dãy trên

0 bình luận về “cho dãy A gồm a1,a2,-.an và N là số nguyên dương. 3 chia hết cho số nào trong dãy trên”

1. uses crt;
   var n,i:longint; a:array[1..10000]of longint;
   begin
   clrscr;
      write(‘N=’);Readln(n);
      for i:=1 to n do
         begin
            write(‘a[‘,i,’]=’);readln(a[i]);
         end;
      for i:=1 to n do if 3 mod a[i]=0 then writeln(a[i]);
   readln
   end.

   Bình luận