ПОМОГИТЕ ПОЖАЛУЙСТА !!!!!!!!!!!!!!!!!1. Вычислить корни квадратного уравнения ax²+bx+c=0? заданного коэффициентами а, b, с (предполагается, что а не равно 0 и что дискриминант уравнения неотрицательный).ПЕРЕВЕСТИ В "ПАСКАЛЬ"

ПОМОГИТЕ ПОЖАЛУЙСТА !!!!!!!!!!!!!!!!! 1. Вычислить корни квадратного уравнения ax²+bx+c=0? заданного коэффициентами а, b, с (предполагается, что а не равно 0 и что дискриминант уравнения неотрицательный). ПЕРЕВЕСТИ В "ПАСКАЛЬ"
Гость
Ответ(ы) на вопрос:
Гость
var a,b,c,x1,x2,d:real; begin read(a,b,c); d:=b*b-4*a*c; x1:=(-b-sqrt(d))/(2*a); x2:=(-b+sqrt(d))/(2*a); writeln(x1,' ',x2); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы