Question

Помогите решить задачи PascalABC.​

Answer 1

1.

var

   a, b : integer;

begin

   write('введите два числа: ');

   readln(a, b);

   if (abs(a) > 10) and (abs(b) > 10) then writeln(a+b) else writeln(a*b);

end.

2... много задач...