Bài 1. Viết chương trình nhập hai số nguyên a và b khác nhau từ bàn phím và in hai số đó ra ngoài màn hình theo thứ tự không giảm
2 câu trả lời
program bai_giai;
uses crt;
var a,b:longint;
begin
clrscr;
write('nhap a:');readln(a);
write('nhap b:');readln(b);
while a=b do
begin
write('nhap lai a:');readln(a);
write('nhap lai b:');readln(b);
end;
if(a>b)then write(a,' ',b)else write(b,' ',a);
readln;
end.
uses crt;
var a,b:integer;
begin
clrscr;
write('Nhap 2 so nguyen: ');readln(a,b);
if a<b then writeln(a,' ',b) else writeln(b,' ',a);
readln
end.