14 lines
298 B
Text
14 lines
298 B
Text
Algorithme: résolution avec discriminant de ax^2 + bx + c = 0
|
|
|
|
Début
|
|
Variable D, a, b, c : Entier
|
|
D <- b^2-4ac
|
|
Si D < 0:
|
|
Ecrire("pas de solution")
|
|
Sinon Si D = 0:
|
|
Ecrire(-b/2a)
|
|
Sinon:
|
|
Ecrire(-b - rac(D)/2a)
|
|
Ecrire(-b + rac(D)/2a)
|
|
FinSi
|
|
Fin
|