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

Помогите составить алгоритм решения(блок-схема) уравнения ax2+bx+c=0 
Очень срочно!

Ответы

Автор ответа: KGW
0
var x1,x2,D:real;
a,b,c:integer;
begin
readln(a,b,c);
D:=sqr(b)-4*a*c;
x1:=(-b+sqrt(D))/(2*a);
x2:=(-b-sqrt(D))/(2*a);
writeln(x1,x2);
readln;
end.
Похожие вопросы
Предмет: Русский язык, автор: gerlcrazy048