viết chương trình tính nhập vào một số, kiểm tra số đó là số chẵn hay số lẻ lm nhanh giúp mk vs mk cần trong hôm nay

2 câu trả lời

var a:longint;

begin

 read(a);

 if a mod 2=0 then write(a,'la so chan') else write(a,'la so le');

end.

Program Hotboy;

Uses crt;

Var a : integer;

Begin

Clrscr;

Write('nhap so do ') ; readln(a)

If a mod 2 =0 then writeln(' so vua nhap la so chan') 

Else writeln(' so vua nhap la so le');

Readln

End.

Câu hỏi trong lớp Xem thêm