Autorisation : Membre
Nb de messages : 9
Inscrit le : Mer 09 Jan 2008, 13:00
Posté le : Mer 29 Oct 2008, 17:55
C'est un programme d'encadrement de la fonction Y1 au point NB. Ca peut être util pr les terminales S. Il n'est pas très rapide mais l'ait déjà plus qu'une recherche par le tableau du graphique. Je n'ai pas trop cherché à le perfectionné vu que j'en ait plus besoin
Code
For(A,0,10
Q->R:P->Q:O->P:N->O:M->N:L->M:C->L:End
Clrhome
Disp "rentrer la fonction dans Y1"
Clrhome
Input "NB", E
Input "LIM MIN",B
Input "LIM MAX",A
If A<B:Then:A->C:B->A:C->B:End
0->X
Y1(A)->G:Y1(B)->H
If H>G:1->X
Lbl1
(A+B)/2->C
Q->R:P->Q:O->P:N->O:M->N:L->M:C->L
Y1(C)->D
If D>E and X=0:C->A
If D>E and X=1:C->B
If D<E and X=0:C->B
If D<E and X=1:C->A
If D=E or A=B or Q=R=P=O=N=M=L=C:Goto2
Goto1
Lbl 2
Output(6,1,"F(X)= EN X="
Output(6,6,E
Output (6,16,C