Forum TI-Planet.org

Bonjour,
J'ai fait ce petit programme pour calcul du discriminant et des solutions d'une équation.

Code: Tout sélectionner

EXPORT delta_fab2()
BEGIN
LOCAL a,b,c,y,x,x1,x2,z;
print();
z := 1;

WHILE z==1 DO
  a:=0;
  b:=0;
  c:=0;
  INPUT(a);
  INPUT(b);
  INPUT(c);

  y := (b^2-4*a*c);

  IF y>0 THEN
    ((-b+√y)/(2*a)) ▶ x1;
    ((-b-√y)/(2*a)) ▶ x2;
 
    MSGBOX("Delta vaut : " + y + " Donc l'équation admet 2 solutions X1 = " + x1 + " et X2 = " + x2);

  END;
 
  IF y<0 THEN MSGBOX("Delta vaut : " + y + " donc l'équation n'a pas de solution");
  END;
 
  IF y=0 THEN
     (-b/(2*a)) ▶ x;
     MSGBOX("Delta vaut : " + y + " donc l'équation a une solution unique X = " + x);
  END;


  MSGBOX("On continue ?", 1) ▶ z;

END;

END;

J'ai deux soucis avec celui-ci :

- J'aurais préféré utiliser des PRINT au lieu de MSGBOX pour l'affichage des solutions, mais si je fais ça le programme ne fonctionne plus , pourquoi ?
- Comment rajouter des sauts de lignes dans un PRINT ou un MSGBOX ?

Bonjour.

Il suffit de mettre \n dans une chaîne de caractère pour un retour à la ligne qui sera pris en compte à la fois par PRINT et par MSGBOX :
"ligne1\nligne2"

Pour le reste, les affichages PRINT et MSGBOX n'ont pas le même comportement.
MSGBOX me semblerait plus pertinent pour ce genre de programme, vu qu'il affiche immédiatement et attend.

Les affichages PRINT se font sur un écran dédié, qui normalement n'est montré qu'en fin de programme, et encore uniquement si les dernières instructions de sortie sont des PRINT.
Il y a toutefois moyen de montrer cet écran en cours de programme. Il suffit de faire suivre une ou plusieurs instructions PRINT de WAIT();.
Les affichages PRINT effectués précédemment seront alors montrés, avec attente d'appui sur une touche.

Super, Merci beaucoup, ça fonctionne parfaitement.

Bonjour,
ce programme de Mikael Nicotéra peut aussi apporter des idées quant à la présentation.
J'espère vous avoir aidé.