Viết chương trình nhập vào hai số a,b và in ra theo chiều không tăng

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”

  1. 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.

    Bình luận

Viết một bình luận