Question

1)viết công thức pascal nhập vào số nguyên a từ bàn phím. kiểm tra và suất ra từ màn hình. a là số chẵn hay lẻ.

\n\n

2)viết chương trình pascal nhập vào 2 số a và b. so sánh 2 số đó.

\n\n

Cảm ơn rất nhiều

\n

Answer 1

1:

\n\n

uses crt;

\n\n

var a:integer;

\n\n

begin

\n\n

clrscr;

\n\n

write(\'nhap a=\'); readln(a);

\n\n

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

\n\n

else writeln(a,\' la so le\');

\n\n

readln;

\n\n

end.

\n\n

2:

\n\n

uses crt;

\n\n

var a,b:integer;

\n\n

begin

\n\n

clrscr;

\n\n

write(\'a=\'); readln(a);

\n\n

write(\'b=\'); readln(b);

\n\n

if a>b then writeln(a,\' lon hon \',b)

\n\n

else if a<b then writeln(b,\' lon hon \',a)

\n\n

else writeln(b,\' bang \',a);

\n\n

readln;

\n\n

end.

\n