
Вопрос задан 12.07.2023 в 08:04.
Предмет Информатика.
Спрашивает Берликов Дамир.
Ни откуда не копировать! Составьте программу решения квадратного уравнения с использованием
подпрограммы-функции.

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

Отвечает Дорфман Илья.
Ответ:
var a,b,c, x1,x2,D: real;
begin
writeln(' а,б,с : ');
readln(a,b,c);
D := b*b - 4*a*c;
if D<0 then writeln('нет ответа') ;
if D=0 then
begin
x1 := -b/2/a;
writeln('х1 : ',x1:0:3);
end;
if D>0 then
begin
x1 := (-b-sqrt(D))/2/a;
x2 := (-b+sqrt(D))/2/a;
writeln('х1 и х2: x1=',x1:0:3,' x2=',x2:0:3);
end;
end.



Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.
Конечно, вот пример программы на языке Python, которая решает квадратное уравнение с использованием подпрограммы-функции:
pythonimport math
def solve_quadratic(a, b, c):
discriminant = b**2 - 4*a*c
if discriminant > 0:
x1 = (-b + math.sqrt(discriminant)) / (2*a)
x2 = (-b - math.sqrt(discriminant)) / (2*a)
return x1, x2
elif discriminant == 0:
x = -b / (2*a)
return x,
else:
return None
def main():
print("Введите коэффициенты квадратного уравнения:")
a = float(input("a: "))
b = float(input("b: "))
c = float(input("c: "))
solutions = solve_quadratic(a, b, c)
if solutions is None:
print("Корней нет")
elif len(solutions) == 2:
x1, x2 = solutions
print(f"Корни уравнения: x1 = {x1}, x2 = {x2}")
else:
x = solutions[0]
print(f"Уравнение имеет один корень: x = {x}")
if __name__ == "__main__":
main()
Вы можете вставить этот код в файл с расширением .py
и запустить его. Программа запросит вас ввести коэффициенты квадратного уравнения, а затем выведет его корни или сообщит, что корней нет.


Похожие вопросы
Топ вопросов за вчера в категории Информатика
Последние заданные вопросы в категории Информатика
Предметы
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili