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

Question

Акилина

1 марта, 16:24

+4

Ответы (1)

Знаете ответ на вопрос?

Евстахий · 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.