Question

Viết chương trình nhập vào 1 số nguyên rồi in kết quả số vừa nhập có chia hết cho 3 hay không?

Vd: Nhập vào 1 số nguyên N=15. Kết quả hiện ra: số bạn vừa nhâp chia hết cho 3
HELP: bài thi

Answer 1

Answer 2

uses crt;

var a:integer;

begin

clrscr;

write('a='); readln(a);

if a mod 3=0 then writeln('so ban vua nhap chia het cho 3')

else writeln('so ban vua nhap khong chia het cho 3');

readln;

end.