Question

Viết chương trình nhập vào từ bàn phím bà số tự nhiên a,b,c: a) thông báo ra màn hình số a là số chẵn hay số lẻ

 b)thông báo ra màn hình số b là số chẵn hay số lẻ

 c) thông báo ra màn hình số c là số chẵn hay số lẻ

d) thông báo ra số lớn nhất trong ba số đó

Ai giúp mik với ạ

Answer 1

uses crt;

var a,b,c,max:integer;

begin

clrscr;

write('nhap ba so:');readln(a,b,c);

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

else writeln(a,'la so le);

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

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

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

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

max:=a;

if max<b then max:=b;

if max<c then max:=c;

writeln('so lon nhat trong ba so la:',max);

readln

end.