Даны коэффициенты квадратного уравнения a,b,c.напишите программу которая решает это квадратное уравнение.(в паскале)
299
481
Ответы на вопрос:
Program uravnenie; uses crt; var a,b,c,x,x1,x2 : real ; begin clrscr; writeln ( 'введите a : ' ); readln ( a ); writeln ( 'введите b : ' ); readln ( b ); writeln ( 'введите c : '); readln ( c ); if ( sqr ( b ) - 4 * a * c ) < 0 then writeln ( ' уравнение не имеет решения ' ) else begin if ( sqr ( b ) - 4 * a * c ) = 0 then begin x: = - b / ( 2 * a ); writeln( ' x = ', x : 8 : 2 ) end else begin x1: = ( - b + sqrt ( sqr ( b ) - 4 * a * c ) ) / ( 2 * a ); x2: = ( - b - sqrt ( sqr ( b ) - 4 * a * c ) ) / ( 2 * a ); writeln( ' x1 = ', x1 : 8 : 2, ' x2 = ', x2 : 8 : 2 ) end end.
Program s; var a,b,c,x,z,d: real; begin write('введите a,b,c'); read(a,b,c); d: =(b**a*c); if d< 0 then write(' уравнение не имеет корней') else x: =(-b+sqrt(d))/(2*a); z: =(-b-sqrt(d))/(2*a); write(' х равно ',x, ', ', z); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
34Марго3531.01.2020 14:45
-
ingad198602.01.2021 22:56
-
lystuchaanna2015.08.2020 02:29
-
oilga0307.06.2022 14:56
-
ЗайчонокЛаймик19.11.2020 05:49
-
СабинаЛис28.04.2022 06:14
-
FaceLess11122.02.2022 13:35
-
valdan200827.04.2021 22:05
-
Эхэхэхэххэ28.04.2021 12:13
-
kamikot03.04.2023 21:22
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.