begin
d := b * b - 4 * a * c
if d >= 0 then begin
x1 := (-b + sqrt (d)) / (2 * a)
x2 := (-b - sqrt (d)) / (2 * a)
Copyright © 2025 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
begin
d := b * b - 4 * a * c
if d >= 0 then begin
x1 := (-b + sqrt (d)) / (2 * a)
x2 := (-b - sqrt (d)) / (2 * a)