Question

viết phương trình kiểm tra số nguyên dương m xem là số chẵn hay số lẻ thông báo ra màn hình M được nhập từ màn hình Mn ơi giúp mình với ạ

Answer 1

program im_14424;

uses crt;

var m: interger;

begin 

clrscr;

write('Nhap vap so nguyen duong m: ');

readln(m);

if m>0 and m mod 2 = 0 then write('So nguyen duong m la so chan');

if m>0 and m mod 2 <> 0 then write('So nguyen duong m la so le);

if m<0 then write('m khum phai la so nguyen duong');

readln

end.

Answer 2

Mong được sự giúp đỡ của mọi người ạ

Answer 3

uses crt;

var m:integer;

begin

clrscr;

repeat

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

until m>0;

if m mod 2=0 then writeln(m,' la so chan')

else writeln(m,' la so le');

readln;

end.