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ẽ.
2 câu trả lời
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.
Câu hỏi trong lớp
Xem thêm