Есть ответ 👍

Что будет выведено на экран после выполнения следующего фрагмента программы? X:=15
Y:=2
вывод "X+Y=", X, "+", Y, "=", X+Y

122
403
Посмотреть ответы 1

Ответы на вопрос:

NooDys
4,8(76 оценок)

Var       d, a, b, c, x1, x2: real; begin       writeln('введите a, b, c');       readln(a, b, c);       d : = b * b - 4 * a * c;             if d > 0 then       begin               x1 : = (-b + sqrt(d)) / (2 * a);               x2 : = (-b - sqrt(d)) / (2 * a);               writeln('x1 = ', x1: 2: 2);               writeln('x2 = ', x2: 2: 2);       end       else if d = 0 then       begin               x1 : = -b / (2 * a);               writeln('x = ', x1: 2: 2);       end       else               writeln('нет действительных корней'); end.

Популярно: Информатика