Question

На языка Паскаль. С клавиатуры вводятся целые числа a, b и c. Если а*b больше, чем с2-b, тогда выведите а+b, в противном случае выведите b+c.

Answer 1

var
a,b,c:Integer;
Begin
 Read(a,b,c);
 if (a*b > c*2-b) then Writeln(a+b)
  else Writeln(b+c);
end.

Answer 2

Благодарю :3