Question

vct nhập vào 1 số n. In ra màn hình thông báo n là số chắn hoặc n là số lẻ

 

Answer 1

Program HOC24;

var i,n: integer;

begin

write('Nhap N: '); readln(n);

if n mod 2=0 then write(n,' la so le') else write(n,' la so chan');

readln

end.

Answer 2

uses crt;

var n:integer;

begin

clrscr;

write('Nhap n='); readln(n);

if n mod 2=0 then write(n,' la so chan')

else write(n,' la so le');

readln;

end.