Bon, si ça plante, tu devrais procéder par étapes :
- Tu tapes un petit programme, qui se contente de lire a, b et c, et de calculer et afficher Delta. Tu vois si ça marche.
- Et après, tu fais ton programme pour calculer et afficher les solutions.
Parce que, suivant le compilateur, tu peux avoir un problème du genre conflit de types(le read renvoie un String).
D'ailleurs, si je me souviens bien de mon Pascal, dans tes Write(ln), a est considéré comme une String, alors que Delta est un Real (c'est pour ça que tu utilise le : larg : deci), non ?
Et sinon, pour le calcul et l'affichage des solutions, tu devrais afficher a, b, c et Delta avant la boucle.
Et peut-être envisager un Case, plutot qu'un enchaînement de IF ...
Message édité par macgawel le 20-09-2004 à 13:31:12