Viết chương trình nhập vào 1 số nguyên N từ bàn phím, cho biết số nhập vào từ bàn phím là số chẵn hay số lẻ? (Dùng if....then....else) * Gợi ý: nếu MOD 2=0 thì đó là chẵn ngược lại đó là số lẻ?
2 câu trả lời
uses crt;
var n : integer;
begin
clrscr;
write('nhap so n : ');readln(n);
if n mod 2 = 0 then writeln(n,' la so chan')
else writeln(n,' la so le');
readln
end.
Program baitap;
Uses crt;
Var N:integer;
Begin
Clrscr;
Write('N='); Readln(N);
If N mod 2=0 then writeln('N la so chan')
Else writeln('N la so le');
Readln
End.