Bonjours, j'ai un exercice ou je dois traduire un algorithme en langage calculatrice (Casio pour ma part) mais les résultats et le programmes est faux... Pourri

Bonjours, j'ai un exercice ou je dois traduire un algorithme en langage calculatrice (Casio pour ma part) mais les résultats et le programmes est faux... Pourriez vous me donner la traduction de celle-ci ? Merci. Mon DM est a rendre Lundi.

Entrée :
Saisir S et P

Traitement
D prend la valeur S²-4×P
Afficher "D=", D
Si D<0
Alors afficher " A et B n'existe pas"
Sinon si D=0
Alors afficher "A et B sont égaux"
A prend la valeur S/2
Afficher A et B
Sinon si D>0
Alors afficher "A et B sont distincts"
A prend la valeur (S-√D)/2
B prend la valeur (S+√D)/2
Afficher A et B
Fin du programme.