Дано два целых числа,вывести большее из них
Program bolwee; var a,b:integer; begin readln(a,b); if a>b then writeln('Большее=',a) else writeln('Большее=',b); end.