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

Ну это уже смешно) 

var
a,b : integer;
begin 
 readln(a); 
readln(b); 
if a > b then writeln(a) 
else writeln(b);
end.