Algorithme résoudre ax²+bx+c=0

Bonjour,

Notre Professeur nous a donner un DL a faire a la maison c'est pourquoi je vous mes mon algorithme pour me le faire corrigé par quelqu'un si j'ai une faute

Merci infiniment !!

algorithme résoudre ax²+bx+c=0
variables a,b,c,x,Δ,x1,x2 : Entier

Début
Ecrire ("pour résoudre l'equation ax²+bx+c veuillez saisir a")
Lire (a)
Ecrire (" saisir b")
Lire (b)
Ecrire ("saisir c")
Lire (c)
si (a=0) alors
x reçoi -a/b
Ecrire (,X"est le résultat de l'équation")
sinon
Δ reçoi b*b-4*a*c
Fin_si
si (Δ=0) alors
x reçoi -b/2a
Ecrire (,X"est le résultat de l'équation")
sinon
si (Δ<0) alors
Ecrire (" L'equation ne peut se résoudre")
sinon
si (Δ>0) alors
x1 reçoi (-b+√Δ)/2a
x2 reçoi (-b-√Δ)/2a
Ecrire ("le résultat le l'équation est x1=",x1"x2=",x2)
Fin_si
Fin