Написать программу которая вычисляет дискриминант квадратного уравнения на языке паскаль (7 видео)

Напишите программу, которая вычисляет дискриминант квадратного уравнения

Задание 178. Напишите программу, которая вычисляет: а) дискриминант квадратного уравнения:
program disc;
var a, b, c, d: real;
begin
writeln (‘a = ‘);
read (a);
writeln (‘b = ‘);
read (b);
writeln (‘c = ‘);
read (c);
d:=b*b-4*a*c;
writeln (‘D = ‘, d);
end.

б) площадь кольца, если его толщина t см, а диаметр внутреннего круга — d см:
program disc;
var d, t, s: real;
begin
writeln (‘d = ‘);
read (d);
writeln (‘t = ‘);
read (t);
s:=3.14*sqr(d/2+t)-3.14*sqr(d/2);
writeln (‘S = ‘, s);
end.

Содержание

Решить квадратное уравнение
Pascal
Язык Си
Python
КуМир
Basic-256
Решение квадратного уравнения -Pascal(Паскаль)
📽️ Видео

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

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

Найти корни квадратного уравнения и вывести их на экран, если они есть. Если корней нет, то вывести сообщение об этом. Конкретное квадратное уравнение определяется коэффициентами 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

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

Видео:34 Задача: Найти корни квадратного уравнения при помощи PythonСкачать

Язык Си

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

Видео:Простая программа на C# которая через дискриминант вычисляет x1,x2Скачать

Python

Видео:Урок 1. Первая программа на Pascal (Сложение чисел)Скачать

КуМир

Видео:решение (поиск корней) квадратных уравнений c++Скачать

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 указывает сколько знаков после запятой следует выводить.

Видео:Решение квадратных уравнений. Дискриминант. 8 класс.Скачать