Misez p'tit Optimisez n°75 : l'aire sous les Batrachions

[C.Ret]

Merci zalpm pour l'attention portée à mon petit code.

En effet, je n'avait pas remarqué qu'il fallait CHECker après avoir définit la fonction. En fait, dès la première utilisation, F0 contenait quelque chose.

Je me rends compte aussi qu'en réinitialisant l'application Fonctions, je perds mon programme AIRBAT !!

Pour l'aire signée négative où j'obtiens -8, j'ai simplement sélectionné l'aire entre g(x) (symbolisée par F3) et f(x) (symbolisé par F2) à l'aide du ous-menu FCN de l'écran graphique.
Il faut cependant avoir sélectionner F3, soit par le sous-menuIDN soit à l'aide du pad et ne pas entrer exactement 4 et 12 avec le sous-menu ALLER, mais se contenter de la valeur approchée produite par le déplacement du curseur ?? Par ailleurs, je suis en mode "Arrondi" 4 chiffres !

Je ne me souviens pas que les valeurs entières saisies 4 et 12 aient posé le moindre problème la semaine dernière lors de la capture d'écran. Je suis depuis pssé en 2016 08 26 (10637) ?

[zpalm]

Pour l'aire signée négative où j'obtiens -8, j'ai simplement sélectionné l'aire entre g(x) (symbolisée par F3) et f(x) (symbolisé par F2) à l'aide du ous-menu FCN de l'écran graphique.
Il faut cependant avoir sélectionner F3, soit par le sous-menuIDN soit à l'aide du pad et ne pas entrer exactement 4 et 12 avec le sous-menu ALLER, mais se contenter de la valeur approchée produite par le déplacement du curseur ??

Effectivement ça marche en déplaçant le curseur avec le pad, mais pas en entrant directement les valeurs de début et de fin ! Étrange...

Je me rends compte aussi qu'en réinitialisant l'application Fonctions, je perds mon programme AIRBAT !!

Tu peux créer une copie de l'application Fonction que tu peux appeler MPO75 par exemple et que tu peux modifier comme tu veux (bouton Enregistrer sur l'écran de la bibliothèque d'applications).

[C.Ret]

Super, je l'ai remisé dans un fichier "Batrachiants" avec les autres programmes recopiés dans ce MPO et lors de mes essais.
C'est pas mal, on peut avoir plusieurs fonctions/programme par ficher et ils apparaissent dans le menu TOOLS/USER/BatrachiantsMO75
Donc, je peux organiser tout cela comme dans les répertoires et sous-répertoires de mon HP-28S.

J'ai modifié AIRBAT pour qu'il accepte des arguments non entiers et qu'il puisse être stocké où l'on veux (merci la commande STARTAPP !
J'ai aussi trouvé un affichage plus élégant qu'un simple MsgBox.

Code : Tout sélectionner

EXPORT AIRBAT(a,b)
BEGIN
LOCAL v, c1:=RGB(99,255,99,240), c2:=RGB(255,99,99,240);

STARTAPP("Fonction"); 

FOR v FROM 1 TO 9 DO UNCHECK(v) END;

F0:="FLOOR((√(8*X-7)+1)/2";
CHECK(0);
Xmin:=−.2;Xmax:=1.2*b;
Ymin:=−.2;Ymax:=1.2*F0(b);
GridDots:=1;GridLines:=0;Labels:=0;
Method:=2;

STARTVIEW(1);
RECT(a,0,CEILING(a),F0(a),c2,c2);
FOR v FROM CEILING(a) TO FLOOR(b)-1 DO
 RECT(v,0,1+v,F0(v),c1,c1) END;
RECT(FLOOR(b),0,b,F0(b),c2,c2);

TEXTOUT("∫ "+a+"→"+b+"="+AREA(F0,a,b),a,F0(b),0);

END;

Bat1.png (7.7 Kio) Vu 1011 fois

Créer une nouvelle instance de l'application 'Fonction' appelé MPO75 c'est pas mal aussi. Tous les réglages, fonctions et autres programmes sont mémorisés là dedans.
Bien pratique.