Составить программу вычисления корней квадратного уравнения по данным значениям его коэффициентов (4 видео)

Исходник программы Паскаль, которая находит корни квадратного уравнения по заданным коэффициентам

Добрый день. Сегодня я хочу поделиться программой, написанной на языке программирования Паскаль, а именно исходник программы, которая находит корни квадратного уравнения.

Итак, задача звучит следующим образом:

«Составьте программу вычисления корней квадратного уравнения по данным значениям его коэффициентов«.

Решение задачи на языке паскаль довольно простое. Вначале необходимо считать данные (значения коэффициентов) в три переменные a,b,c. Затем нужно посчитать дискриминант, после проверить больше или меньше нуля или равно ему значение дискриминанта. В зависимости от значения дискриминанта считать значение корней или вывести сообщение о том, что корней нет.

Исходный код программы нахождения корней:

Скачать исходник: koren2.pas

Содержание

Составить программу вычисления корней квадратного уравнения по данным значениям его коэффициентов
Решить квадратное уравнение
Pascal
Язык Си
Python
КуМир
Basic-256
🔍 Видео

Видео:Формула корней квадратного уравнения. Алгебра, 8 классСкачать

Составить программу вычисления корней квадратного уравнения по данным значениям его коэффициентов

Введение.

Здравствуйте. На этот раз я хотел бы предложить вам исходник программы на языке PascalABC, которая решает квадратное уравнение, строя его на считанных с клавиатуры коэффициентов.

Задача.

Перед нами поставлена задача написать программу, которая будет искать решения квадратного уравнения по заранее указанным значениям его коэффициентов. Данное решение можно считать достаточно простым, использовать мы будем цикл IF. Для выполнения задачи необходимо считать данные в соответствующее количество переменных, затем найти значение дискриминанта, проверить больше, меньше, или равен ли он нулю. Далее в зависимости от результатов проверки высчитываются и выводятся корни, либо сообщение о том, что корней нет. Для ясности понимания к каждой строке кода приложены необходимые комментарии.

Видео:Программа для решения корней квадратного уравнения с использованием дискриминанта на языке ПаскальСкачать

Решить квадратное уравнение

Найти корни квадратного уравнения и вывести их на экран, если они есть. Если корней нет, то вывести сообщение об этом. Конкретное квадратное уравнение определяется коэффициентами a , b , c , которые вводит пользователь.

Квадратное уравнение имеет вид ax 2 + bx + c = 0 . Коэффициенты a , b и c — это конкретные числа, а x надо найти, решив уравнение.

Вычислить дискриминант по формуле d = b 2 — 4ac .
Если дискриминант больше нуля, то вычислить два корня уравнения:
x₁ = (-b+√d) / 2a
x₂ = (-b-√d) / 2a
Если дискриминант равен нулю, то вычислить только один корень (второй будет равен ему).
Если дискриминант отрицателен, то вывести сообщение, что корней нет.

Видео:Составьте программу вычисления корней квадратного уравнения по данным значениям его коэффициентовСкачать

Pascal

квадратное уравнение паскаль

Видео:СУММА КОЭФФИЦИЕНТОВ: Как решать Квадратные Уравнения по МАТЕМАТИКЕ 8 классСкачать

Язык Си

Ключ -lm при компиляции gcc.

Видео:Вычисление корней квадратного уравненияСкачать

Python

Видео:Формула корней квадратного уравнения с четным вторым коэффициентомСкачать

КуМир

Видео:Урок 1 - Создание программы для вычисления корней квадратного уравнения на RAD StudioСкачать

Basic-256

Total 0
0
0
0
0

квадратное уравнение паскаль

var
a,b,c,d,x1,x2: real;
begin
write(‘a=’); readln(a);
write(‘b=’); readln(b);
write(‘c=’); readln(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:3:2,’; x2=’,x2:3:2);
end
else
if d = 0 then begin
x1 := (-b) / (2*a);
writeln(‘x=’,x1:5:2);
end
else
writeln(‘Корней нет’);
end.

main() <
float a,b,c,d,x1,x2;
printf(«a=»); scanf(«%f»,&a);
printf(«b=»); scanf(«%f»,&b);
printf(«c=»); scanf(«%f»,&c);
d = b*b — 4*a*c;
if (d>0) <
x1 = (-b + sqrt(d)) / (2*a);
x2 = (-b — sqrt(d)) / (2*a);
printf(«x1=%.2f; x2=%.2f», x1, x2);
>
else
if (d = 0) <
x1 = -b / (2*a);
printf(«x1=%.2f; x2=%.2f», x1, x2);
>
else printf(«Корней нет.»);
printf(«n»);
>

Ключ -lm при компиляции gcc.

python квадратное уравнение

print(«Введите коэффициенты для квадратного уравнения (ax^2 + bx + c = 0):»)
a = float(input(«a = «))
b = float(input(«b = «))
c = float(input(«c = «))

discr = b**2 — 4 * a * c;
print(«Дискриминант D = %.2f» % discr)
if discr > 0:
import math
x1 = (-b + math.sqrt(discr)) / (2 * a)
x2 = (-b — math.sqrt(discr)) / (2 * a)
print(«x1 = %.2f nx2 = %.2f» % (x1, x2))
elif discr == 0:
x = -b / (2 * a)
print(«x = %.2f» % x)
else:
print(«Корней нет»)

input «a = «, a
input «b = «, b
input «c = «, c
d = b^2 — 4*a*c

if d > 0 then
x1 = (-b + sqrt(d)) / (2*a)
x2 = (-b — sqrt(d)) / (2*a)
print «x1 = » + x1 + «, x2 = » + x2
else
if d = 0 then
x = -b / (2*a)
print «x = » + x
else
print «Корней нет»
endif
endif

Команда decimal указывает сколько знаков после запятой следует выводить.