efrei/algorithmique/algos-simples/discriminant.algo

15 lines
298 B
Text
Raw Normal View History

2021-09-03 08:58:12 +02:00
Algorithme: résolution avec discriminant de ax^2 + bx + c = 0
2021-09-03 10:14:13 +02:00
2021-09-03 08:58:12 +02:00
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