Viết chương trình nhập hai số nguyên a,b khác nhau từ bàn phím và in ra hai số đó ra màn hinh theo thứ tự không giảm.

program So_nguyen ;

uses ctr ;

var a,b:integer ;

begin

        clrscr ;

        write(‘Nhap so a la:’) ; readln (a) ;

        write(‘Nhap so b la:’) ; readln (b) ;

     if ( a>b ) then wite (a,’ ‘,b) ;

       readln ;

End.

Mình nghĩ là như vậy:(( sai thì thuii nhé