program Bai1;
n, i, d: integer ;
A: array [1..1000] of integer;
write(‘ nhap so n:’);
for i: = 1 to n do:
writeln(‘so han thu A[‘,i,’]=’);
read(A[i]);
Var n:integer;
Begin
Write('Nhap n = ');readln(n);
If n mod 2 = 0 then write(n,' chia het cho 2')
Else write(n,' khong chia het cho 2');
Readln;
End.
n=float(input("nhập N: "))
if (n%2==0):
print("chia hết cho 2")
else:
print("ko chia hết cho 2")