Poster un nouveau sujet Poster une réponse
Encadrement
Auteur Message
luffy_yop



Autorisation : Membre
Nb de messages : 9
Inscrit le : Mer 09 Jan 2008, 13:00
Posté le : Mer 29 Oct 2008, 17:55   Citer 

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



 Adresse email Haut de page Bas de page 
 
coc5
Avatar

Autorisation : Membre
Nb de messages : 891
Inscrit le : Sam 16 Jui 2007, 13:37
Posté le : Jeu 30 Oct 2008, 15:03   Citer 

J'avais fais un programme similaire, mais il faudrait que je le retrouve...

Cependant j'aurais quand même une remaqrue après lecture de ton code :

Code

Q=R=P=O=N=M=L=C



Ce code n'est à prioris pas valide.
Essaie sur ta calculatrice:
Code

2 -> A : 2 -> B : 2 -> C
If A=B=C:Disp "ERROR"



En effet, le programme teste d'abord A=B. Il renvoie 1 (dans ce cas là, A=B donc 1 correspond à "vrai" ). Ensuite il teste C=1, ce qui est faux.

Donc je ne pense pas que ton code soit parfaitement fonctionnel...

----------------------
Ne cliquez pas ici !
 Adresse email Haut de page Bas de page 
 
luffy_yop



Autorisation : Membre
Nb de messages : 9
Inscrit le : Mer 09 Jan 2008, 13:00
Posté le : Ven 31 Oct 2008, 12:51   Citer 

En effet merci happy.gif
Bon, 'reste plus qu'à mettre des "and"

 Adresse email Haut de page Bas de page 
 
Poster un nouveau sujet Poster une réponse





  Powered by Fire-Soft-Board v1.0.10 © 2004 - 2024 Groupe FSB
Page générée en 9 requêtes
BlackOne par Grimmlink