нужно до конца дня мне уже сдать работу Запишите - вопрос №12230531 от polina19a 22.03.2021 14:14

Question

Информатика: нужно до конца дня мне уже сдать работу Запишите программу вычисляющую значение функции вычислить Y={ корень A +B если A B 0 { A+B^2 в остальных случаях при этом у пользователей должны запрашиваться ввод значений переменных A и B с клавиатуры то есть при запуске программы на экране должно быть выдано сообщение Введите значение переменной А и пользователь вводит его затем на экран выдается сообщение Введите значение переменной В и пользователь вводит его Далее в зависимости от условий будет вычислен

polina19a · Answer

// PascalABC.NET 3.3, сборка 1611 от 06.01.2018

// Внимание! Если программа не работает, обновите версию!

begin

var (a,b):=ReadReal2('Введите а и b:');

Writeln('Кoрень уравнения вида ax+b=0 равен ',-b/a)

end.

Пример

Введите а и b: -2.5 6

Кoрень уравнения вида ax+b=0 равен 2.4