Задача 5 Урок 9

http://fkn.ktu10.com/?q=node/8539
Пользователь вводит два числа, найдите из них максимальное

program Project1;
var a, b: integer;
begin
  writeln('vvedite chisla: ');
  readln(a,b);
  if a>b then
  writeln ('bolshee chislo',' ', a);
  if b>a
 then  writeln ('bolshee chislo',' ', b);
  readln();
end.