Viết chương trình nhập vào một số nguyên từ bàn phím ,cho biết số nhập vào là số chẵn hay số lẻ ( Dùng If ....Then....Else) a. Khai báo một biết kiểu số nguyên b. Thân chương trình gồm các lệnh Nhập giá trị cho một biến kiểu số nguyên đã khai báo trên *Nếu số nguyên vừa nhập chia hết cho 2 thì in ra màn hình thông báo là số chẵn .Ngược lại in ra màn hình thông báo là số lẻ

2 câu trả lời

Program Chanle;
Uses crt;
Var n: longint;
Begin
        Clrscr;
        Write('Nhap n: '); Readln(n);

        If n mod 2 = 0 then Write('So chan')
        Else Write('So le');
        Readln
End.

uses crt;
var n:longint;
begin 
clrscr;
   write('Nhap mot so nguyen: ');readln(n);
   if n mod 2=0 then
      writeln(n,' la so chan')
   else 
      writeln(n,' la so le');
readln
end.