Ecuatia de gradul al II lea [ algoritm ]

Ecuatia de gradul al II lea

D.I: a, b,c 

D.Ie: x1, x2

citeste a, b, c

daca a != 0

        D = b * b - 4 * a * c 

        daca D > 0 atunci

                 x1 = ( -b + SQRT ( D ) ) / ( 2 * a )

                 x2 = ( -b - SQRT ( D )  / ( 2 * a )

                 scrie x1, x2

        altfel

        daca D = 0 atunci 

        x1 =  ( -b ) / ( 2 * a ) 

        x2 = x1 

        scrie x1, x2

        altfel

        scrie " Ecuatia nu are solutii reale " 

D - delta

!= - nu este egal