Question

с компьютера вводятся целые числа a b c, если а больше ,чем с²-b,то выведите a+b в противном случае выведите b+c

Answer 1

Program zadacha;
Var a,b,c: Integer;
Begin
 write('Введите А ');
 read(a);
 Write('Введите Б ');
 read(b);
 Write('Введите C ');
 read(c);
  If a>c*c-b Then Write(a+b)
             Else Write(b+c);
ReadLn;
End.