Nom : Racines d'un trinôme dans R
Variables :
a,b,c : type réels
Delta, x1, x2 : type réels
Début
a ← 0
Tantque a=0
Faire
Entrer le coefficient a
FinTantque
Entrer b et c
Delta ← b²-4*a*c
Si Delta ← 0
Alors
Afficher "Pas de racines"
Sinon
x1 ← (-b-√(Delta))/(2*a)
x2 ← (-b+√(Delta))/(2*a)
FinSi
Afficher x1,x2
Fin