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

Question

Информатика

Полюша

10 ноября, 06:10

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

+1

Ответы (1)

Знаете ответ на вопрос?

Тома · Answer 1

A, b, c, D : integer;

begin

Writeln ('Введите коэфф-ты а, b и c') ;

Readln (a, b, c) ;

D = b * b - 4 * a * c;

Writeln (D) ;

Readln () ;

end.

Учтите, что если вам нужна программа для нахождения корней квадратного уравнения, то вам надо проверять все условия. Например, дескриминант может быть равен нулю и тд