Viết chương trình nhập hai số nguyên vào từ bàn phím. In các số vừa nhập theo thứ tự không tăng 29/07/2021 Bởi Eden Viết chương trình nhập hai số nguyên vào từ bàn phím. In các số vừa nhập theo thứ tự không tăng
Program NN;Uses crt;Var a,b: longint;Begin Clrscr; Write(‘Nhap a,b: ‘); Readln(a,b); If a>b then Write(a,’ ‘,b) Else Write(b,’ ‘,a); ReadlnEnd. Bình luận
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(b, ‘ ‘, a) else write(a, ‘ ‘, b); readln end. Bình luận
Program NN;
Uses crt;
Var a,b: longint;
Begin
Clrscr;
Write(‘Nhap a,b: ‘); Readln(a,b);
If a>b then Write(a,’ ‘,b)
Else Write(b,’ ‘,a);
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(b, ‘ ‘, a) else write(a, ‘ ‘, b);
readln
end.