E 2. Рассмотрите изображение.
Рисунок 1
2.1. Опишите 2 последствия нарушения правил техники безопасности, представленные на
рисунке 1.
2.2. Предложите 2 действия во избежание последствий нарушення правил техники
безопасности.
144
365
Ответы на вопрос:
Procedure sqroot(a, b, c: real; var x1, x2: real; var nroots: integer); {корни квадратного уравнения с коэффициентами a,b,c. nroots - количество найденных действительных корней n=0: корни мнимые, х1 - вещественная часть, х2 - мнимая; n=1: корни действительные и равные, х1=х2; n=2: корни действительные и разные, х1, х2} var d: real; begin d : = sqr(b) - 4 * a * c; if d < 0 then begin nroots : = 0; x1 : = -b / (2 * a); x2 : = sqrt(-d) / (2 * a); end else if d = 0 then begin nroots : = 1; x1 : = -b / (2 * a); x2 : = x1 end else begin nroots : = 2; d : = sqrt(d); x1 : = (-b - d) / (2 * a); x2 : = (-b + d) / (2 * a) end end; {тестирование} var a2, a1, a0, x1, x2: real; n: integer; begin repeat write('введите коэффициенты уравнения: '); readln(a2, a1, a0); if abs(a2) + abs(a1) > 0 then begin sqroot(a2, a1, a0, x1, x2, n); case n of 0: writeln('корни мнимые: ', x1: 0: 6, '-i*', x2: 0: 6, ', ',x1: 0: 6, '+i*', x2: 0: 6); 1: writeln('корни действительные и равные: ', x1: 0: 6); 2: writeln('корни действительные и разные: ', x1: 0: 6, ', ', x2: 0: 6) end end until abs(a2) + abs(a1) = 0 end. тестовое решение: введите коэффициенты уравнения: 3 -2.5 1 корни мнимые: 0.416667-i*0.399653, 0.416667+i*0.399653 введите коэффициенты уравнения: -3 5 2 корни действительные и разные: 2.000000, -0.333333 введите коэффициенты уравнения: 4 -6 2.25 корни действительные и равные: 0.750000 введите коэффициенты уравнения: 0 0 0
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Pavelteknik30.10.2022 20:24
-
кириешка518.08.2022 21:27
-
kall514.10.2021 08:19
-
alinakyberskaya27.12.2020 14:08
-
xacku114.07.2022 00:54
-
katyaivanova1708.02.2023 22:49
-
Алексей12341218.08.2020 15:19
-
Aizirek0214.06.2020 12:44
-
020803.03.2021 20:28
-
КлубВинксРоссия1722.04.2023 01:52
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.