Viết chương trình Nhập vào số nguyên a và cho biết số đó là số chẵn hay số lẻ ?
2 câu trả lời
var a:integer;
Begin
Write('hay nhap gia tri của a:') ;
Read(a) ;
If a mod 2 = 0 then writeln(a, 'la so chan') else writeln(a, 'la so le') ;
Readln;
End.
var a:integer;
begin
writeln('nhap a:');readln(a);
if a mod 2=0 then write(a,' la so chan')
else write(a,' la so le');
readln
end.