uses crt; var a,b: integer; begin clrscr; write (‘nhap a: ‘); readln (a); write (‘nhap b: ‘); readln (b); if a>b then begin writeln (a,’ lon hon ‘,b); writeln (b,’ nho hon ‘,b); end; if a<b then begin writeln (b,’ lon hon ‘,a); writeln (a,’ nho hon ‘,b); end; readln; end.
program ctpt;
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 write(a, ‘ be hon ‘, b) else
write(‘So nguyen a va b phai khac nhau, ban nhap sai!’);
readln
end.
uses crt;
var a,b: integer;
begin
clrscr;
write (‘nhap a: ‘); readln (a);
write (‘nhap b: ‘); readln (b);
if a>b then
begin
writeln (a,’ lon hon ‘,b);
writeln (b,’ nho hon ‘,b);
end;
if a<b then
begin
writeln (b,’ lon hon ‘,a);
writeln (a,’ nho hon ‘,b);
end;
readln;
end.
đảm bảo không bao giờ sai
꧁༺????????????́???? ????????̣???? ????????̣???? ????????̂́????✔
๖ۣۜc̲̅a̲̅o̲̅ t̲̅h̲̅ủ p̲̅a̲̅s̲̅c̲̅a̲̅l̲̅ッ