Ответ(ы) на вопрос:
Гостьd := b*b - 4*a*c;
writeln('Нет корней');
x := -b / (2*a);
writeln('x равен ',x);
x1 := (-b + sqrt(d)) / (2*a);
x2 := (-b - sqrt(d)) / (2*a);
writeln('x1 равен ',x1);
writeln('x2 равен ',x2);
Не нашли ответ?
Похожие вопросы