viết chương trình nhập A gồm N số nguyên dương (N-50) : N được nhập từ bàn phím.Sau đó thông báo ra màn hình các số chia hết cho 3

Question

cattien · Answer

var a:array[1..1000] of longint;

n,i:longint;

begin

write(‘nhap so luong phan tu ‘);readln(n);

for i:=1 to n do read(a[i]);readln;

for i:=1 to n do

if a[i] mod 3=0 then write(a[i],’ ‘);

readln

end.

0 bình luận về “viết chương trình nhập A gồm N số nguyên dương (N-50) : N được nhập từ bàn phím.Sau đó thông báo ra màn hình các số chia hết cho 3”