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
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
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.