Предмет: Информатика, автор: olesyaya51

1)даны 3 числа a,b,c, являющиеся коэффициентами квадратного уравнения. Составить алгоритм и программу для нахождения корней этого квадратного уравнения.


Ответы

Автор ответа: daniilkey
1

var a,b,c:real;


begin


writeln('Введите A,B,C');


readln(a,b,c);


if((b*b-4*a*c)<0) then begin writeln('Уравнение не имеет корней'); halt(); end;


writeln('x1 =',' ',(((b*(-1)-sqrt(b*b-4*a*c))/2*a)));


writeln('x2 =',' ',(((b*(-1)+sqrt(b*b-4*a*c))/2*a)));


end.

Похожие вопросы
Предмет: Математика, автор: levmironchuk
Предмет: Русский язык, автор: cryinglm47
Предмет: Биология, автор: asd300404
Предмет: Математика, автор: topol2