С компьютера вводятся целые числа a b c, если а больше ,чем с²-b,то выведите a+b в противном случае выведите b+c
С компьютера вводятся целые числа a b c, если а больше ,чем с²-b,то выведите a+b в противном случае выведите b+c
Гость
Ответ(ы) на вопрос:
Гость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.
Не нашли ответ?
Похожие вопросы