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ẻ ? 22/08/2021 Bởi Alexandra 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ẻ ?
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. Bình luận
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. Bình luận
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.