viết chương trình nhập 2 số nguyên a và b từ bàn phím.in ra màn hình số có giá trị lớn hơn(pascal) giúp em với ạ

Viết chương trình nhập vào 2 số nguyên a và b. In ra màn hình giá trị lớn nhất.

uses crt;

var a,b:integer;

begin

clrscr;

write('a='); readln(a);

write('b='); readln(b);

if a=b then writeln('vui long nhap hai so khac nhau')

else if a>b then writeln('so lon nhat la: ',a)

else writeln('so lon nhat la: ',b);

readln;

end.