Даны целых два числа a и b. написать программу, которая находит большее из них

Question

Даны целых два числа a и b. написать программу, которая находит большее из них

Answer 1

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

Answer 2

Что тут писать-то? 
на псевдоязыке:

начало программы
ввести числа a и b
если a>b тогда вывести "a больше b", иначе вывести "b больше a"
конец программы

Почитайте учебник, прежде чем такую элементарщину спрашивать - это базовые понятия любого языка программирования