30 ! написать программу для определения количества корней квадратного уравнения по коэффициентам a, b, c
Ответы на вопрос:
program yrav;
var
a,b,c,d,x1,x2,x: real;
begin
writeln('введите коэффиценты квадратного уравнения');
readln(a,b,c);
d: =b*b-4*a*c;
if d< 0 then writeln('корней нет');
if (d> 0) and (a< > 0)and (b< > 0)and (c< > 0) then
begin
x1: =(-b+sqrt(d))/(2*a);
x2: =(-b-sqrt(d))/(2*a);
writeln('x1= ',x1: 6: 3,' x2= ',x2: 6: 3);
end;
if (a=0)and(b< > 0)and(c< > 0) then
begin
x=-c/b;
writeln('один корень уравнения х= ',x: 6: 3);
end;
if (b=0)and(c< 0) and(a< > 0) then
begin
x1=sqrt(-c/a); x2=-sqrt(-c/a);
writeln('x1= ',x1: 6: 3,' x2= ' ,x2: 6: 3);
end
else writeln('корней нет! ');
if (a< > 0) and(b< > 0)and(c=0) then
begin
x1: =0;
x2: =-b/a;
writeln('x1= ', x1: 6: 3,' x2= ',x2: 6: 3);
end;
end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Ilka1k02.11.2021 22:03
-
ibraevaira28.07.2020 09:03
-
dionakavinep08o5z22.07.2022 17:57
-
LuzuVloks19.08.2021 09:23
-
Aida2004111109.08.2021 22:04
-
annatimofeeva417.11.2020 07:30
-
kotikdo512.06.2022 12:06
-
мирэлюзий05.02.2020 03:40
-
LeraSmile1221.01.2020 23:28
-
Лесолес09.11.2021 21:47
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.