Даны действительные числа a, b, c. даны действительные - вопрос №1969418 от AmmosD 07.04.2023 23:12

Question

Информатика: Даны действительные числа a, b, c. даны действительные числа a, b, c. найдите все решения квадратного уравнения ax2 + bx + c = 0. формат входных данных даны три действительных числа, a не равно 0. формат выходных данных выведите два действительных числа, если уравнение имеет два корня, одно действительное число – при наличии одного корня. при отсутствии действительных корней ничего выводить не нужно.паскаль

AmmosD · Answer

Var a,b,c:real;begin read(a,b,c);if sqr(b)-4*a*c 0 then write((-b-sqrt(sqr(b)-4*a*c))/(2*a), ,(-b+sqrt(sqr(b)-4*a*c))/(2*a)) elseif sqr(b)-4*a*c=0 then write(-b/(2*a))end....