viết chương trình nhập vào số nguyên a.Kiểm tra xem số đó là số chẵn hay lẽ. 25/08/2021 Bởi Peyton viết chương trình nhập vào số nguyên a.Kiểm tra xem số đó là số chẵn hay lẽ.
program chan_le; uses crt; var a:integer; begin clrscr; writeln(‘Nhap so a:’); readln(a); If (a mod 2 = 0) then writeln (a,’la so chan’) else write (a, ‘la so le’); readln end. Chúc bạn học tốt nha^.^ Bình luận
Uses crt; Var x:integer; Begin Write(‘Nhap vao mot so nguyen : ‘); Readln(x); If x MOD 2=0 Then Writeln(‘So vua nhap vao la so chan’) Else Writeln(‘So vua nhap vao la so le’); Readln; End. Bình luận
program chan_le;
uses crt;
var a:integer;
begin
clrscr;
writeln(‘Nhap so a:’);
readln(a);
If (a mod 2 = 0) then writeln (a,’la so chan’)
else write (a, ‘la so le’);
readln
end.
Chúc bạn học tốt nha^.^
Uses crt;
Var x:integer;
Begin
Write(‘Nhap vao mot so nguyen : ‘);
Readln(x);
If x MOD 2=0 Then
Writeln(‘So vua nhap vao la so chan’)
Else
Writeln(‘So vua nhap vao la so le’);
Readln;
End.