PASCAL : viết 2 số nguyên a và b làm sao khi in ra màn hình a 'lớn hơn 'b, a'nhỏ hơn' b và a 'bằng' b

2 câu trả lời

Gửi bạn:

uses crt;

var a,b:integer;

begin

clrscr;

writeln('Nhap a: '); readln (a);

writeln('Nhap b: '); readln (b);

if a>b then writeln ('a lon hon b');

if a<b then writeln('a nho hon b');

if a=b then writeln('a bang b');

readln

end.

uses crt;

var a,b:integer;

begin

clrscr;

write ('Nhap a: '); readln (a);

write ('Nhap b: '); readln (b);

if a>b then write ('a lon hon b')

else if a<b then write ('a nho hon b') else write ('a bang b');

readln;

end.

Câu hỏi trong lớp Xem thêm