Viết chương trình nhập vào một số nguyên dương n kiểm tra và thông báo ra màn hình số n vừa là số chẵn vừa chia hết cho 3 không?
Viết chương trình nhập vào một số nguyên dương n kiểm tra và thông báo ra màn hình số n vừa là số chẵn vừa chia hết cho 3 không?
Câu này hơi dài nên mình dùng hình có sẵn cho bạn nhé, đổi chữ a->n
uses crt;
var n: integer;
Begin
clrscr;
write(‘Nhap n: ‘); readln(n);
if (n mod 2=0) and (n mod 3=0) then
write(n,’ vua la so chan, vua chia het cho 3′)
else write(n,’ khong la so chan, khong chia het cho 3′);
readln
End.