2. в компьютер вводятся два числа(тип если первое больше второго, то вычислить их сумму, иначе - произведение. формат вывода, как в примере!

Program Pr1;
uses crt;
var a,b,c:integer;
Begin
writeln('a,b');
readln(a,b);
if a>b then c:=a+b
else c:=a*b;
writeln('Задача Решена');
end.

Вроде бы так.