Вводится два целых числа a и b; вывести, какое из них большее. Если числа равны, тогда вывести "числа равны".

целочисленный тип - integer
Как правильно сделать?

Var a, b :Integer; Beginwrite('a = ');readln(a);write('b = ');readln(b);if a>b then writeln('Число a = ',a,' больше b = ',b)else if b>a then writeln('Число b = ',b,' больше a = ',a)     else writeln('Числа равны');end.Пример:a = 5b = 8Число b = 8 больше a = 5