Помогите составить алгоритм решения(блок-схема) уравнения ax2+bx+c=0 Очень срочно!
Помогите составить алгоритм решения(блок-схема) уравнения ax2+bx+c=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.
Не нашли ответ?
Похожие вопросы