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

http://fkn.ktu10.com/?q=node/8539

Пользователь вводит два числа, найдите из них максимальное. (тут всё просто)

program z5;
var a, b : integer;
begin
writeln ('vvedite dva chisla:');
readln (a, b );
if (a>b) then
writeln(a);
else
writeln(b);
readln();
end.