Дано два целых числа,вывести большее из них

program bolwee;
var a,b:integer;
begin
readln(a,b);
if a>b then writeln('Большее=',a)
else writeln('Большее=',b);
end.