de jmLeR-1 » 15 Juin 2018, 14:55
Bonjour j'ai créer un programme avec un menu, le problème est que le menu interverti SENSE DE VARIT° et LIMITE, je comprend pas trop pourquoi pourriez vous m'éclaircir d'ou vient l'erreur, de plus il y a un problème dans le menu LIMITE (lbl E), merci de votre aide
- Code: Tout sélectionner
EffÉcran
Lbl Z
Menu(" SUITES ","SUITE ARITHM",2,"SUITE GEOM",3,"METODO RECCU",4,"F(L)=L LORSQUE..",B,"SENS DE VARIA°",E,"LIMITE",5,"POUR U=F()",A,"Retour Menu",0)
Lbl 0
prgmAMATHS
Stop
Lbl A
EffÉcran
Disp "PR U=F() :"
Input "ENTRER F(X) ",Chn1
Chn1→Y₁
Disp "","UTILISER TABLE"
Disp "DE VALEURS:","DEF TABLE (F2)"
Disp " >DEM"," >TABLE (F5)"
Pause
Goto Z
Lbl 2
EffÉcran
Disp "SUITE ARI:"
Disp "U(+1)=U+R",""
Disp "U=U0+R"
Disp "OU DEPUIS U1:","U=U1+(-1)R"
Pause
EffÉcran
Disp "SOMME DE TERMES:",""
Disp "(+1)(U0+U)/2",""
Disp "OU DEPUIS U1:",""
Disp "*(U1+U)/2"
Pause
EffÉcran
Disp "LIM EN +INF=",""
Disp "+INF SI R>0 "
Disp "U(0) SI R=0"
Disp "-INF SI R<0"
Pause
Goto Z
Lbl 3
EffÉcran
Disp "SUITE GEOM:"
Disp "U(+1)=U*Q",""
Disp "U=U0*Q^"
Disp "OU DEPUIS U1:","U=U1*Q^(-1)"
Pause
EffÉcran
Disp "SOMME DE TERMES:",""
Disp "U0* [1-Q^(+1)]","/(1-Q)",""
Disp "OU DEPUIS U1:"
Disp "U1(1-Q^)/(1-Q)"
Pause
EffÉcran
Disp "LIMIT DE Q^=",""
Disp "0 SI 1<Q<1"
Disp "+ INF SI Q>1"
Disp "SI Q=1,U CONSTAN"
Disp "NO LIMIT SI Q≤1"
Pause
Goto Z
Lbl 4
EffÉcran
Disp "INITIALISATION:"
Disp "ON VEUT MONTRER","QUE LA PROPRIETE"
Disp "... EST VRAIE:","[...] LA PROPRI","EST VERIFIEE AU","PREMIER RANG"
Pause
EffÉcran
Disp "HEREDITE:","PR TOUT εN,"
Disp "ON SUPPOSE QUE","LA PROPRI VRAIE:"
Disp "[...] LA PROPRI","EST VRAIE AU","RANG (+1)"
Pause
EffÉcran
Disp "CONCLUSION:"
Disp "LA PROPRI EST","VRAIE. (OOPA)"
Pause
Goto Z
Lbl B
EffÉcran
Disp "SI ON A :"
Disp "U(+1)=F[U()]"
Disp "U CONV VERS L"
Disp "F CONTINU EN L"
Pause
EffÉcran
Disp "ALORS"
Disp "LIM[U(+1)]=L"
Disp "LIM [F(U)]=F(L)"
Disp "CAR F EST CONTI"
Disp "EN L"
Disp "DONC F(L)=L"
Pause
Goto Z
Lbl E
EffÉcran
Disp "Pour determiner la lim de U(n):"
Disp "technique classique:decomposer"
Disp "Si forme indéterminée:"
Disp "facteur le termes prépondérant.."
Disp "simplifié et chercher limite.. ou.."
Pause
EffÉcran
Disp "theoreme du gendarme:"
Disp "souvent (-1)^n cos(n) sin(n)"
Disp "Un<Vn<Wn"
Pause
Goto Z
Lbl 5
EffÉcran
Disp "PROUVER QUE U","EST CROISS OOPA:",""
Disp "METHOD 1 :","SIGNE DE"
Disp "U(+1)-U()"
Pause
Disp "","OU MONTRER QUE","U(+1)≥/≤U()"
Pause
EffÉcran
Disp "METHODE 2 :"
Disp "DS LE CAS OU","TOUS U()>0,"
Disp "CALCULER :","U(+1)/U()"
Disp "ET COMPARER A 1"
Pause
EffÉcran
Disp "METHOD 3 :","DANS LE CAS DE"
Disp "SUIT DEF PAR REC","U(+1)=F[U()]"
Pause
Disp "","ET SI F CROISS","SUR UN INTERV"
Disp "AUQUEL APPARTIEN","TOUS LES U()"
Pause
Disp "","COMPARER U0 A U1"
Disp "PUIS","FAIRE UNE REC"
Pause
Goto Z
Dernière édition par
jmLeR-1 le 15 Juin 2018, 17:00, édité 1 fois.
