Составить программу на паскале которая находит большее из двух чисел

Program jkfj;
var
a,b:integer;
begin
writeln (Введите 1-ое число);
read (a);
writeln (Введите 2-ое число);
read (b);
if aelse write (Большее a);
if a=b then write (a и b равны)
end.
Сакура, могут быть ошибки в знаках, но в целом вроде хорошо!