Регистрация
DemonDem25
04.12.2021 12:29
Информатика
Есть ответ 👍

Mcafee activate telephone number,mcafee.com/enact bolster telephone number, mcafee activation help, mcafee retail card support ,office setup help,install mcafee, setup office online, activate mcafee, mcafee client support number, mcafee client administration number usa, mcafee client administration number uk, mcafee client administration number

visit for more information

158
222
Посмотреть ответы 1

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

NooDys
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.

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