Viết chương trình nhập vào hai số a,b và in ra theo chiều không tăng
0 bình luận về “Viết chương trình nhập vào hai số a,b và in ra theo chiều không tăng”
Uses crt; Var a, b: integer; Begin Clrscr; Write(‘Nhap a = ‘); readln(a); Write(‘Nhap b = ‘); readln(b); If a>b then writeln(b,’ ‘,a) else writeln(a,’ ‘,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 writeln(b,’ ‘,a) else writeln(a,’ ‘,b);
Readln
end.