Seuls les membres ayant 30 points peuvent parler sur le chat.
Menu
Calculatrices
Graph 35 à 100 (CFX)
Graph 25/25+ (Pro) (fx-7400)
Graph 35+USB/75/85/95 (SD)
Graph 100/100+ (AFX)
ClassPad 300/330
Fx-CG 10/20
Fx-CP 400
Graph 90+E
Liens
¤ Transférer un programme sur
sa calculatrice

¤ Vous cherchez une fonction ?
Cours/E-activities >> Graphs 75/85/95 (SD) >> Maths >> Bac2013 s maths
Bac2013 s maths
Version : Complet Taille : 11976 octets Ajouté le : 2013-05-17 20:34 Modifié le : 2016-06-05 23:52
Auteur et posteur :
ShykedHors ligneMembrePoints: 272 Défis: 20 Message
Planète Casio - Cours Casio de maths - Bac2013 s maths - Shyked - Calculatrices
Nombre de visites sur cette page : 178548
Score au progrank : 77
Note actuelle : 7/10 noté 1 fois

Vous devez être inscrit(e) et avoir 20 points ou plus pour noter.
64341 téléchargements | Soumettre un test

Ce programme est sous licence Creative Commons 2.0 BY-SA


Ce programme a été récompensé pour sa qualité par le label Planète Casio.

Ce cours n'a pas été mis à jour depuis 6 années. Considérez donc son contenu avec précaution car certaines parties peuvent être obsolètes.
Description :

Résumé :
Cours/pompes du programme de Maths de l'année scolaire 2012-2013 pour le Bac série S, c'est à dire le programme de Mathématiques de Terminale S.



Pour transférer votre programme sur votre calculatrice grâce au logiciel FA-124, merci de vous référer à ce tutoriel.


Premier fichier : MATHS.G1M
Deuxième fichier : MATHS.G1R

(Les deux fichiers sont identiques[/u], seule l'extension est différente. Libre à vous de choisir celle que vous voulez.)


Voici mon programme que j'ai conçu en suivant le nouveau programme de l'année 2013 de maths pour la série S.
Il n'y a pas encore tout, d'ici quelques jour j'ajouterai le reste quand on aura fini le programme entièrement.

Il y a aussi une petite partie du programme de l'année dernière (programme de première donc). Le plus utile est disponible dans le même menu que le reste, mais on peut quand même retrouver quelques chapitre pas trop utiles de l'année dernière en allant sur "Ancien" dans le menu.


Commandes (cliquez pour dérouler)
Commandes
Les commandes sont plutôt intuitives, mais je vais quand même faire un récapitulatif :
- Flèches pour se déplacer dans le menu
- Rentrer le numéro du chapitre voulu (Pour les chapitres à un chiffre, vous pouvez taper soit 01, soit 1+EXE)
- EXE pour avancer dans le texte
- Certains chapitres comme celui contenant les dérivées peuvent être navigué grâce aux touches gauche et droite, puis en appuyant sur EXIT pour quitter (Dans ce cas, des flèches apparaîtront en bas à droite de l'écran)


Compatibilité
Compatibilité
- Graph 25+
- Graph 35+ (non USB)
- Graph 35+ USB
- Graph 35+ USB (tweaké)
- Graph 65
- Graph 75
- Graph 85 (excepté les menus 00 et 99)
- Graph 100+ (quelques bugs de caractères)

Compatible
Non compatible
Partiellement compatible




Récapitulatif des "chapitres" :
1. Suites
2. Suites2
3. Vecteurs
4. Dérivées
5. Stats
6. Equations cartésiennes
7. Produits scalaires
8. Exponentielle
9. Proba
10. Vecteurs dans l'espace
11. Trigonométrie
12. Complexes
13. Logarithmes
14. Intégrales
15. Complexes+
16. Loi de probabilité à densité
17. Loi normale
18. Approximation Loi binomiale - Loi normale
19. Produit scalaire dans l'espace
20. Echantillonnage - Estimation
00. Outils de calculs (Loi normale, loi binomiale)
99. Ancien

! FAQ (à lire en cas de problème) !
Cliquez pour enrouler
- Il manque un chapitre, j'aimerai en ajouter un ou bien qu'il soit ajouté au programme, est-ce possible ?[/green]
Le programme restera comme ça, je n'en ajouterai sûrement pas plus. Il contient l'essentiel ce qui peut être noté, pour le reste, libre à vous de l'ajouter dans un programme à part.

- Je ne sais pas programmer, comment faire ?
Planète Casio dispose d'un Générateur de cours. Vous pouvez l'utiliser pour faire votre programme sans aucune connaissance dans la programmation. Utilisez ensuite le logiciel de transfert adapté pour votre calculatrice pour transférer le programme généré, sur votre calculatrice.

- Lorsque j'essaie de lancer le programme, la calculatrice m'affiche "Erreur Mémoire", comment faire pour qu'il fonctionne ?
La calculatrice a besoin d'un minimum de mémoire pour pouvoir lancer un programme. Veillez à garder au moins 3000o minimum sur la mémoire principale de votre calculatrice.

- Comment mettre le programme sur ma Graph 100+ ?
Casform permet de convertir le code du fichier .g1r vers du code .fxi . Cependant, le programme possède un certain nombre de problèmes de compatibilité avec ces calculatrices. Il ne fonctionnera donc pas correctement.

- J'ai perdu beaucoup de fonctions dans le menu RUN.MAT (pour faire les calculs). Comment ça se fait ?
Je ne sais pas pourquoi certaines personnes ont eu ce bug, et je ne sais même pas si ça a un rapport avec mon programme. Dans tous les cas, pour corriger ce problème, il faut aller dans le menu RUN, puis : SHIFT -> MENU (SET UP) -> Input/Output : Math



Dans la même série : Programme de Physique-Chimie du Bac 2013 Série S


Note sur 10 Commentaire Date de notation
7Je m'attendais à un programme très complet, mais j'ai été déçu : les infos présentes sont, à quelques cas près, peu utiles en devoir. Toutefois, le programme aborde bien toutes les notions auLe 15.03.2014 à 14:01

Commentaires :

Pages: Précédente | 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18 | Suivante

guiwake
Statut : Invité
Posté le 08-06-2013 à 19:55 | #
d'accord mais dois je utiliser casform ou casiocom ?
guiwake
Statut : Invité
Posté le 08-06-2013 à 20:00 | #
voici la manip que je viens de faire :
copie du code donné ci dessus dans fx interface mais impossible de lire sur la calculatrice
help please !!!
sanounou
Statut : Invité
Posté le 08-06-2013 à 20:06 | #
Meme quand je fais pas attention quand on me dit "odds..." le programme ne marche pas; comme s'il yavait une erreur quelque part
ShykedHors ligneMembrePoints: 272 Défis: 20 Message
Posté le 09-06-2013 à 11:41 | #
@guiwake : T'as pris le code converti grâce à Casform ? Si tu veux, je m'en suis chargé :
Code (cliquez pour dérouler)
Code
Lbl 0
ClrText
1ÞA
4ÞB
0ÞD~E
Locate 10,7,".."
Do
If A=1
Then Locate 1,1,"1.Suites"
Locate 1,2,"2.Suites2"
Locate 1,3,"3.Vecteurs"
Locate 1,4,"4.Derivees"
Locate 1,5,"5.Stats"
Locate 1,6,"6.Equa cart"
Else If A=2
Then Locate 1,1,"7.Scalaire"
Locate 1,2,"8.Exponentielle"
Locate 1,3,"9.Proba"
Locate 1,4,"10.Vecteurs espace"
Locate 1,5,"11.Trigo"
Locate 1,6,"99.Ancien"
Else If A=3
Then Locate 1,1,"12.Complexes"
Locate 1,2,"13.Logarithme"
Locate 1,3,"14.Integrales"
Locate 1,4,"15.Complexes+"
Locate 1,5,"16.Proba densit#E60A"
Locate 1,6,"17.Loi normale"
Else If A=4
Then Locate 1,1,"18.Norm+Binomial"
Locate 1,2,"19.Scalaire espace"
Locate 1,3,"20.Echant Estim"
Locate 1,6,"00.Outils"
IfEnd
IfEnd
IfEnd
IfEnd
Locate 1,7," "
Locate 21,7," "
A>1ãLocate 1,7,"#E69A"
A<BãLocate 21,7,"#E69B"
Do
While Getkeyá0
WhileEnd
0ÞZ
Do
GetkeyÞX
Isz Z
Z=5000ãGoto X
LpWhile X=0
If (X=38 Or X=79) And A>1
Then A-1ÞA
Break
IfEnd
If (X=27 Or X=29) And A<B
Then A+1ÞA
Break
IfEnd
10ÞC
X=72ã1ÞC
X=62ã2ÞC
X=52ã3ÞC
X=73ã4ÞC
X=63ã5ÞC
X=53ã6ÞC
X=74ã7ÞC
X=64ã8ÞC
X=54ã9ÞC
X=71ã0ÞC
If X=47 Or X=48
Then ClrText
"Appuyez sur EXE."
Stop
IfEnd
If X=44
Then 0ÞD~E
Locate 10,7,".."
IfEnd
If Cá10
Then E=0ãCÞD
E=1ãD©10+CÞD
Dâ10 Or E=0ãLocate 10,7,D
D<10 And E=1ãLocate 11,7,D
E+1ÞE
IfEnd
If E=2 Or X=31
Then For 1ÞZ To 200
Next
D=0ãGoto Y
D=1ãGoto 6
D=2ãGoto 7
D=3ãGoto 8
D=4ãGoto 9
D=5ãGoto B
D=6ãGoto C
D=7ãGoto D
D=8ãGoto E
D=9ãGoto F
D=99ãGoto A
D=10ãGoto G
D=11ãGoto H
D=12ãGoto I
D=13ãGoto J
D=14ãGoto K
D=15ãGoto L
D=16ãGoto M
D=17ãGoto N
D=18ãGoto O
D=19ãGoto P
D=20ãGoto Q
0ÞD~E
Locate 10,7,".."
IfEnd
LpWhile 1
Locate 1,1,"                     "
Locate 1,2,"                     "
Locate 1,3,"                     "
Locate 1,4,"                     "
Locate 1,5,"                     "
Locate 1,6,"                     "
LpWhile 1
Lbl A
ViewWindow 1,127,0,1,63,0
GridOn
CoordOn
AxesOn
LabelOn
Menu "Maths","Croiss ou ”roiss",1,"Fonction racine",2,"f absolue",3,"Comp x‹,†x,x",4,"k machin",5,"Suites",6,"Suites 2",7,"Vecteurs",8,"-->",Z
Lbl Z
Menu "Maths2","D#E60Ariv#E60Aes",9,"Stats",B,"Equation cart",C,"Scalaire",D,"Exp",E,"Proba",F,"<--",A,"[Back]",0
Lbl 1
ClrText
"f sur I"
"a et b sur I"
"si aàb et f(a)àf(b),"
"f est croiss sur I"Ý
"si f(a)âf(b) alors f"
"est ”roiss"Ý
Goto 0
Lbl 2
Cls
Graph Y=†XÝ
Goto 0
Lbl 3
ClrText
"@7Cx@7Câ0"
"@7Cx@7C=0 alors x=0"
"@7C-x@7C=@7Cx@7C"
"@7Cx@7C=@7Cy@7C alors x=y ou"
"x=-y"
"@7Cx©y@7C=@7Cx@7C©@7Cy@7C"Ý
"@7Cx@7C @7Cx@7C"
"@7C-@7C= -"
"@7Cy@7C @7Cy@7C"
"@7Cy-x@7C=@7Cx-y@7C"
"†(x‹)=@7Cx@7C"Ý
Cls
ViewWindow -59,67,0,-11,51,0
Text 1,1,"@7C 2x @7C"
Graph Y=Abs 2XÝ
Cls
Text 1,1,"@7C x‹-2X @7C"
Graph Y=Abs (X‹-40)Ý
Goto 0
Lbl 4
ClrText
ViewWindow -2.1875,5.6875,0,-0.6875,3.1875,0
Graph Y=X‹
Graph Y=X
Graph Y=†XÝ
Goto 0
Lbl 5
ClrText
"u est une fonction"
"k un reel"Ý
""
"(u+k)(x)=u(x)+k"Ý
"Ex : u(x)=x‹+1"
"u+3? (u+3)(x)=x‹+1+3=x‹+4"Ý
"u+k a le meme sens de"
"variation que u"Ý
""
"(k©u)(x)=k©u(x)"Ý
"k>0, meme sens var"
"k<0, sens diff"Ý
Goto 0
Lbl 6
ClrText
"u@E76E = Terme general"
"r = Raison"Ý
""
"La suite = \"u\" ou \"(un)\""Ý
"L'image de \"n\" par"
"la suite \"u\" se note"
"u@E76E plutot que u(n)"Ý
Goto 0
Lbl 7
ClrText
"Suites geometriques"
""
"u@E76E#E5DB#E5D1=q©u@E76E"
"Premier terme k"
"u@E76E=u@E76B©q¨(@E76E#E5DC@E76B)"Ý
ClrText
"  N"
"S=-©(P+D)"
"  2"
"N ombre de termes"
"P remier terme"
"D ernier terme"Ý
""
For 1ÞZ To 10
Next
"    1-q¨N"
For 1ÞZ To 10
Next
"S=P©-----"
For 1ÞZ To 10
Next
"     1-q"
For 1ÞZ To 10
Next
"N ombre de termes"
For 1ÞZ To 10
Next
"P remier terme"
""Ý
ClrText
"Suite arithmetique"
""
"Montrer que :"
"u@E76E+#E5D1-u@E76E = r"Ý
ClrText
"Suite geometrique"
""
"Montrer que :"
"u@E76E+1"
"---- = q"
" u@E76E"Ý
Goto 0
Lbl 8
ClrText
"x©y'=x'©y"Ý
Goto 0
Lbl 9
1ÞW
Do
ClrText
If W=1
Then "f(x)=b ,b#E6BDR"
"f#E6BDR"
"f'(x)=0"
"f'#E6BDR"
IfEnd
If W=2
Then "f(x)=mx ,m#E6BDR"
"f#E6BDR"
"f'(x)=m"
"f'#E6BDR"
IfEnd
If W=3
Then "f(x)=mx+p"
"f#E6BDR"
"f'(x)=m"
"f'#E6BDR"
IfEnd
If W=4
Then "f(x)=x‹"
"f#E6BDR"
"f'(x)=2x"
"f'#E6BDR"
IfEnd
If W=5
Then "f(x)=x#E5C3"
"f#E6BDR"
"f'(x)=3x‹"
"f'#E6BDR"
IfEnd
If W=6
Then "f(x)=x¨n"
"f#E6BDR"
"f'(x)=nx¨(n-1)"
"f'#E6BDR"
IfEnd
If W=7
Then "     1"
"f(x)=-"
"     x"
"f#E6BDR*"
"      -1"
"f'(x)=--"
"      x‹   f'#E6BDR*"
IfEnd
If W=8
Then "f(x)=†(x)"
"f#E6BDR#E5CB"
"       1"
"f'(x)=---"
"      2†x"
"f'#E6BD]0
IfEnd
If W=9
Then "u+v"
""
"(u+v)'=u'+v'"
IfEnd
If W=10
Then "u©v"
""
"(u©v)'=u'©v+u©v'"
IfEnd
If W=11
Then "#E64Au"
""
"(#E64Au)'=#E64A©u'"
IfEnd
If W=12
Then "u‹"
""
"(u‹)'=2©u'©u"
IfEnd
If W=13
Then "u#E5C3"
""
"(u#E5C3)'=3©u'©u‹"
IfEnd
If W=14
Then "u¨n"
""
"(u¨n)'=n©u'©u¨(n-1)"
IfEnd
If W=15
Then "1"
"-"
"u"
""
" 1 ' -u'"
"(-) =---"
" u   u‹"
IfEnd
If W=16
Then "u"
"-"
"v"
""
" u ' u'©v-u©v'"
"(-) =---------"
" v       v‹"
IfEnd
If W=17
Then "†u"
""
"       u'"
"(†u)'=---"
"      2†u"
IfEnd
W<17ãLocate 21,7,"#E69B"
W>1ãLocate 20,7,"#E69A"
Do
LpWhile Getkeyá0
Do
GetkeyÞV
LpWhile Vá38 And Vá27 And Vá47
V=47ãGoto 0
V=38ãW-1ÞW
V=27ãW+1ÞW
W=18ã17ÞW
W=0ã1ÞW
LpWhile 1=1
Lbl B
ClrText
"  n#E5D1©x#E5D1+n#E5D2©x#E5D2+..."
"Â=---------------"
"         N"Ý
ClrText
"  n#E5D1(x#E5D1-Â)+n#E5D2(x#E5D2-Â).."
"V=-------------------"
"          N"
"#E643=†V"Ý
Goto 0
Lbl C
ClrText
"Point A(x#E5D0
"Vecteur u(#E640
"ax+by+c=0"
"a=#E641"
"b=-#E640"
"c=-#E641©x#E5D0+#E640©y#E5D0"Ý
ClrText
"A( , ) B( , )"
"M(x,y)"
"M#E6BD(d)  Vect AM et AB"
"colineaires"Ý
""
"AM(x-2,y+3)"
"AB(6,5)"
"6(y+3)=5(x-2)"Ý
""
"On passe tout a"
"droite et on a"
"l'equation."Ý
Goto 0
Lbl D
ClrText
"u et v deux vecteurs"Ý
"               -#E691 -#E691"
"u#E5A7v=AB©AC©cos (AB
"   =#E6D7u#E6D7©#E6D7v#E6D7©cos (u,v)"Ý
ClrText
"#E691 #E691 #E691 #E691"
"u#E5A70=0#E5A7u=0"Ý
ClrText
"cos (u,v)=1
u#E5A7v=#E6D7u#E6D7©#E6D7v#E6D7"
""
"cos (u,v)=-1
u#E5A7v=-#E6D7u#E6D7©#E6D7v#E6D7"Ý
ClrText
"u‹=u#E5A7u=#E6D7u#E6D7‹"
"u#E5A7v=#E6D7u+v#E6D7‹-#E6D7u#E6D7‹-#E6D7v#E6D7‹"
"    ----------------"
"            2"Ý
ClrText
"u#E5A7v=xx'+yy'"
""
"u‹=u#E5A7u=#E6D7u#E6D7‹=x‹+y‹"
"donc #E6D7u#E6D7=†(x‹+y‹)"Ý
ClrText
"(ku)#E5A7v=u#E5A7(kv)=ku#E5A7v"
"u#E5A7(v+w)=u#E5A7v+u#E5A7w"Ý
ClrText
ViewWindow 1,127,0,1,63,0
CoordOff
GridOff
AxesOff
LabelOff
F-Line 60,30,120,30
F-Line 70,30,100,50
F-Line 100,50,97,50
F-Line 100,50,100,47
SketchDotF-Line 100,50,100,30
Text 63-25,70,"A"
Text 63-50,103,"C"
Text 63-25,100,"H"
Text 63-30,122,"B"
F-Line 5,30,50,30
F-Line 30,30,10,50
F-Line 10,50,13,50
F-Line 10,50,10,47
SketchDotF-Line 10,50,10,30
Text 63-25,30,"A"
Text 63-50,5,"C"
Text 63-25,10,"H"
Text 63-30,52,"B"
Text 55,1,"AB.AC=AB.AH"
"Meme sens :"
"u#E5A7v=AB©AH"
"Sens contraire :"
"u#E5A7v=-AB©AH"
""
"SHIFT+F6 pour graph"Ý
Goto 0
Lbl E
ClrText
"e#E5C0=1"Ý
"exp(a+b)="
"exp(a)©exp(b)"Ý
"         exp(a)"
"exp(a-b)=------"
"         exp(b)"Ý
"exp(na)=exp(a)¨n"Ý
"e#E5C1=e"Ý
"           1"
"exp(-x)=------"
"        exp(x)"Ý
ClrText
"Tangente :"
""
"y=f'(a)(x-a)+f(a)"Ý
ClrText
"lim(¥x)=+¾"
"xÞ+¾"Ý
""
"lim(¥x)=0#E5CB"
"xÞ-¾"Ý
""
"lim((¥x)/(x))=+¾"
"xÞ+¾"Ý
""
"lim(x¥x)=0#E5CC"
"xÞ-¾"Ý
""
"    (¥h-1)"
"lim ------- = 1"
"hÞ0    h"Ý
Goto 0
Lbl F
ClrText
"0àP(A)à1"Ý
"  _"
"P(A)=1-P(A)"Ý
"P(A#E6C3B)"
"=P(A)+P(B)-P(A#E6C4B)"Ý
"     cas favorables"
"P(A)=--------------"
"     cas possibles"Ý
"E(X)=#E551p@E769x@E769"Ý
"V(X)=p@E769(x@E769-E(X))‹"
"#E661(X)=†(V(X))"Ý
""
"      P(A#E6C4B)"
"P@E761(B)=------"
"       P(A)"Ý
""
"Evenements"
"independants :"
"P(A#E6C4B)=P(A)©P(B)"Ý
""
"Si A et B sont deux"
"evenements"
"independants, alors"
"_"
"A et B le sont."Ý
Goto 0
Lbl G
ClrText
"Vecteurs
coplanaires :"
"#E691  #E691  #E691"
"w=xu+yv"Ý
ClrText
"Equation param :"
"x=x@E741+k©x@E775"
"y=y@E741+k©y@E775"
"z=z@E741+k©z@E775"Ý
Goto 0
Lbl H
ClrText
"cos (x+2Ð)=cos x"
"cos (-x)=cos x"
"sin (x+2Ð)=sin x"
"sin (-x)=-sin x"Ý
ClrText
ViewWindow 1,127,0,1,63,0
CoordOff
GridOff
AxesOff
LabelOff
Text 1,1,"sin (a+b)=sin acos b+sin bcos a"
Text 7,1,"sin (a-b)=sin acos b-sin bcos a"
Text 13,1,"cos (a+b)=cos acos b-sin asin b"
Text 19,1,"cos (a-b)=cos acos b+sin asin b"
Text 25,1,"cos 2a=cos ‹a-sin ‹a"
Text 31,1,"sin 2a=2sin a©cos a"Ý
ClrText
"f(x)=sin x"
"f'(x)=cos x"
""
"f(x)=cos x"
"f'(x)=-sin x"Ý
ClrText
"f(x)=sin u"
"f'(x)=u'©cos u"
""
"f(x)=cos u"
"f'(x)=-u'©sin u"Ý
ClrText
"      sin x"
"tan x=-----"
"      cos x"
""
"f(-x)=-f(x)"
"impaire"Ý
ClrText
"f(x)=tan x"
"         1"
"f'(x)=------"
"      cos ‹x"
"ou  f'(x)=1+tan ‹x"Ý
Goto 0
Lbl I
ClrText
"-"
"z sera note #E5CCz"Ý
ClrText
"z=a+ib"
"#E5CCz=a-ib"Ý
ClrText
"Proprietes :"
"#E5CC#E5CCz=z"
"z+#E5CCz=2Re(z)"
"z-#E5CCz=2iIm(z)"
"#E5CC(zz')=#E5CCz©#E5CCz'"Ý
ClrText
"Proprietes :"
"#E5CC(1/z)=1/#E5CCz"
"#E5CC(z/z')=#E5CCz/#E5CCz'"
"#E5CC(z+z')=#E5CCz+#E5CCz'"Ý
ClrText
"Graphiquement,"
"les points d'affixe"
"z et #E5CCz sont symet"
"par rapport a l'axe"
"des abscisses."Ý
ClrText
"Module d'un complexe"
"@7Cz@7C=†(a‹+b‹)=†(z©#E5CCz)"Ý
ClrText
"@7C#E5CCz@7C=@7Cz@7C"
"@7Cz@7C=†(z©#E5CCz)"
"   =†(#E5CCz©#E5CC#E5CCz)"
"@7Czz'@7C=@7Cz@7C©@7Cz'@7C"
"@7C1/z@7C=1/@7Cz@7C"
"@7Cz/z'@7C=@7Cz@7C/@7Cz'@7C"Ý
ClrText
"@7Cz‹@7C=@7Cz@7C‹"
"@7Cz¨n@7C=@7Cz@7C¨n"Ý
ClrText
"AB=@7Cz@E742-z@E741@7C"
""
"/¯«¯\\"
"@7Cz+z'@7Cáááá@7Cz@7C+@7Cz'@7C"Ý
ClrText
"Cercle :"
"(X@E74D-X#E558)‹+(Y@E74D-Y#E558)‹=R‹"
""
"@7Cz@E74D-z@E741@7C=?"Ý
ClrText
"Mediatrice :"
"y=ax©b"
""
"@7Cz@E74D-z@E741@7C=@7Cz@E74D-z@E742@7C"Ý
ClrText
"Si #E543<0 :"
""
"   -b+i†@7C#E543@7C"
"z#E5D1=--------"
"      2a"Ý
""
"   -b-i†@7C#E543@7C"
"z#E5D2=--------"
"      2a"
While Getkeyá0
WhileEnd
While Getkey=0
WhileEnd
Goto 0
Lbl J
ClrText
"ln x=y <=> ¥y=x"Ý
ClrText
"ln 1=0"
"ln e=1"
"ln x ssi x#E6BD]0
"ln a=ln b <=> a=b"
"ln a<ln b <=> a<b"Ý
""
"ln (¥x)=x"
"¥(ln x)=x"Ý
ClrText
"ln (ab)=ln a+ln b"
"ln (a‹)=2ln a"
"ln (a¨n)=n(ln a)"
"ln (1/b)=-ln b"
"ln (a/b)=ln a-ln b"
"ln †a=(1/2)©ln a"Ý
ClrText
"lim ln x=+¾"
"xÞ+¾"
""
"lim ln x=-¾"
"xÞ0"
"x>0"Ý
ClrText
"    ln x"
"lim ----=0#E5CB"
"xÞ+¾  x"
Locate 1,5,"lim xln x=0#E5CC"
Locate 1,6,"xÞ0"
Locate 1,7,"x>0"Ý
ClrText
"    ln (1+h)"
"lim --------=1"
"hÞ0     h"Ý
ClrText
"        1"
"(ln x)'=-"
"        x"
"           u'"
"   (ln u)'=-"
"           u"Ý
Goto 0
Lbl K
ClrText
"Int aÞa f(x) dx=0"
""
"Chasles :"
"Int aÞc="
"Int aÞb+Int bÞc"Ý
1ÞW
Do
ClrText
If W=1
Then "f(x)=x"
"     1"
"F(x)=-x‹+k"
"     2"
IfEnd
If W=2
Then "f(x)=k'"
""
"F(x)=k'x+k"
IfEnd
If W=3
Then "f(x)=x¨n"
"      1"
"F(x)=---x¨(n+1)+k"
"     n+1"
IfEnd
If W=4
Then
"     1"
"f(x)=-"
"     x"
""
"F(x)=ln x+k"
IfEnd
If W=5
Then
"      1"
"f(x)=---"
"     2†x"
""
"F(x)=†x+k"
IfEnd
If W=6
Then
"     1"
"f(x)=--"
"     x‹"
""
"     -1"
"F(x)=--+k"
"     x"
IfEnd
If W=7
Then "f(x)=¥x"
""
"F(x)=¥x+k"
IfEnd
If W=8
Then "f(x)=sin x"
""
"F(x)=-cos x+k"
IfEnd
If W=9
Then "f(x)=cos x"
""
"F(x)=sin x+k"
IfEnd
If W=10
Then "u'©u¨n"
""
" 1"
"---©u¨(n+1)+k"
"n+1"
IfEnd
If W=11
Then "u'"
"--"
"u"
""
"ln u+k"
IfEnd
If W=12
Then "u'¥u"
""
"¥u+k"
IfEnd
If W=13
Then "u'"
"---"
"2†u"
""
"†u+k"
IfEnd
If W=14
Then "u'"
"--"
"u‹"
""
"-1"
"--+k"
"u"
IfEnd
If W=15
Then "u'sin u"
""
"-cos u+k"
IfEnd
If W=16
Then "u'cos u"
""
"sin u+k"
IfEnd
W<16ãLocate 21,7,"#E69B"
W>1ãLocate 20,7,"#E69A"
Do
LpWhile Getkeyá0
Do
GetkeyÞV
LpWhile Vá38 And Vá27 And Vá47
V=47ãBreak
V=38ãW-1ÞW
V=27ãW+1ÞW
W=17ã16ÞW
W=0ã1ÞW
LpWhile 1=1
ClrText
"Int aÞb f(x) dx"
"=-Int bÞa f(x) dx"Ý
ClrText
"Linearite des int :"
""
"Int f+g=Int f+Int g"
"Int k©f(x)=kInt f(x)"Ý
ClrText
"Si f est positive"
"sur I alors Int â0"Ý
ClrText
"Si"
"f(x)âg(x)"
"Alors"
"Int f(x)âInt g(x)"Ý
ClrText
"Inegalite de la moy"
"Si "
"màf(x)àM"
"Alors"
"m(b-a)àInt f(x)àM(b-a)"Ý
ClrText
Goto 0
Lbl L
"         Þ -Þ"
"arg z=Î=(u
""
"z=r(cos Î+¿sin Î)"
"avec r=@7Cz@7C"
"et Î=arg z"Ý
ClrText
"      a"
"cos Î=-"
"      r"
"           b"
"     sin Î=-"
"           r"Ý
ClrText
"arg(#E635)=-arg(z) [2Ð]"
"arg(-z)=Ð+arg z  \""
"arg(zz')"
"   =arg z+arg z'"Ý
ClrText
"   1"
"arg-=-arg z"
"   z"
"      z"
"   arg-=arg z-arg z'"
"      z'"Ý
ClrText
ViewWindow -2,5,0,-2,5,0
AxesOn
F-Line 0,0,3,2
F-Line 1,2,4,4
Text 5,40,"(u
Cls
"            z@E744-z@E743"
"(AB
"            z@E742-z@E741"Ý
ClrText
"Ecriture exp :"
""
"z=r¥(¿Î)"Ý
Goto 0
Lbl M
ClrText
"f densit proba si :"
"Continue,positive"
"sur I,et aire sur I"
"=1u.a (unit d'aire)"Ý
ClrText
"p(aàXàb)"
"=#E6BB(aÞb)f(x) dx"Ý
ClrText
"Esperance:"
"I=[a,b]"
"E(x)=#E6BB(aÞb)xf(x) dx"Ý
ClrText
"Esperance loi unif"
"E(x)=(b+a)/2"Ý
ClrText
"Loi exponentielle:"
"f(x)=#E64A¥(-#E64Ax)"
""
"E(x)=1/#E64A"Ý
ClrText
"Exp,dur#E60Ae de vie"
"sans vieillissement"
""
"P@E754â@E761(Tâa+h)=p(Tâh)"Ý
Goto 0
Lbl N
ClrText
"Loi normale standard"
"ou centr#E60Ae :"
"N(0,1)"Ý
ClrText
"P(aàXàb)"
"Þ NormCD(a,b)"Ý
ViewWindow -4,4,1,-1,1,1:CoordOn:GridOff:AxesOn:LabelOn
Graph Y=(1¹(†(2Ð)))©¥(-X‹¹2)
SketchDotVertical -1
SketchDotVertical 1
Text 40,3,"P(Xà-a)"
Text 47,3,"=P(Xâa)"Ý
ClrText
"InvNormCD() :"
"Calcule une absisse"
"#E601 partir d'une aire."Ý
Cls
Graph Y=(1¹(†(2Ð)))©¥(-X‹¹2)
"(1¹(†(2Ð)))©¥(-X‹¹2)"Þô1
For -3ÞX To 0 Step 0.15
Xà-1ãF-Line X,ô1,1,ô1
X>-1ãF-Line X,ô1,-X,ô1
Next
Text 35,80,"a"
Text 1,10,"InvNormCD(AIRE NOIRE) = a"Ý
ClrText
"Valeurs a connaitre:"
"P(-1.96àXà1.96)=95%"
"P(-2.58àXà2.58)=99%"Ý
Cls
Graph Y=(1¹(†(2Ð)))©¥(-(X-1)‹¹2)
Text 35,80,"#E64B"
-1ÞX
F-Line 0,ô1,2,ô1
Text 26,86,"#E651"
Text 50,2,"N(#E64B,#E651‹)"Ý
ClrText
"Centrer une loi"
"normale generale :"
"X         N(#E64B,#E651‹)"
"  X-#E64B"
"Z=---     N(0,1)"
"   #E651"Ý
ClrText
"Calcul avec norm gene"
"NormCD(a,b,#E643,#E64B)"Ý
ClrText
"P(#E64B-#E651àXà#E64B+#E651)=68.3%"
"P(#E64B-2#E651àXà#E64B+2#E651)=95.4%"
"P(#E64B-3#E651àXà#E64B+3#E651)=99.7%"Ý
Goto 0
Lbl O
ClrText
"B(n,p)"
"p:proba du succes"
"E(X)=np"
"#E651(X)=†(np(1-p))"
"P(X=k)=(n˜k)((p)¨k)©((1-p)¨(n-k))"Ý
ClrText
"N(np,np(1-p))"
"Conditions :"
"nâ30  npâ5  n(1-p)â5"Ý
Goto 0
Lbl P
ClrText
"Equation cart plan:"
"ax+by+cz+d=0"
"Þ"
"n(a,b,c) vect norm"Ý
ClrText
"Pos relative de 2"
"plans:"
"-Paralleles"
"-Colineaires"
"-Secants"
"-Perpendiculaires"Ý
ClrText
Goto 0
Lbl Q
ClrText
"   X@E76E"
"F@E76E=--"
"   n"Ý
ClrText
"Pour 95%"
"I=[p-1.96©S
"  †(p(1-p))"
"S=---------"
"      †n"Ý
ClrText
""
"I=[p-u#E640©S
""
"  †(p(1-p))"
"S=---------"
"      †n"Ý
ClrText
"Si p est inconnu :"
"I=[f@E76F@E762@E773-(1/†n)
"   f@E76F@E762@E773+(1/†n)]"
""
"(Niveau de confiance"
"=95%)"Ý
ClrText
"Toujours #E601 condition"
"que :"
"nâ30"
"nfâ5"
"n(1-f)â5"Ý
Goto 0
Lbl Y
ClrText
Locate 1,1,"1.NormCD()"
Locate 1,2,"2.InvNormCD()"
While Getkeyá0
WhileEnd
Do
GetkeyÞV
LpWhile Vá72 And Vá62 And Vá47
V=47ãGoto 0
If V=72
Then ClrText
"Si centree:#E64B=0 #E651=1"
"#E64B "?ÞP
"#E651 (†#E651‹) "?ÞQ
"a "?ÞR
"b "?ÞS
NormCD(R,S,Q,P)Ý
Else If V=62
Then ClrText
"Si centree:#E64B=0 #E651=1"
"Aire "?ÞP
"#E64B "?ÞQ
"#E651 "?ÞR
ClrText
"L'aire est de"
""
Locate 1,2,P
"sur ]-¾
Locate 9,3,InvNormCD(P,R,Q)
Locate 20,3,"]"Ý
IfEnd
IfEnd
Goto 0
Lbl X
ClrText
"Pause,"
"appuyez sur EXE"Ý
Goto 0
Vrac syntaxes :
BinomialCD(X,20,(1»5))
(N˜k)((P)¨k)©((1-P)¨N-k)
Esperance loi ´om:
n©p
NormCD(a,b,#E643,#E64B)



@sanounou : Pour le message d'erreur c'est normal, théoriquement c'est pas censé perturber le bon fonctionnement du programme. Après, pourquoi ça marche pas je sais pas.
Tu as quoi comme modèle de calculatrice ? Et quelle est l'erreur affichée ?
guiwake
Statut : Invité
Posté le 09-06-2013 à 12:01 | #
bon j'ai refait en prenant ton code que j'ai copié dans fx-interface professional, j'arrive à le copier sur la calculatrice mais impossible de le lire (syn error), je ne comprends pas !!
ShykedHors ligneMembrePoints: 272 Défis: 20 Message
Posté le 09-06-2013 à 12:04 | #
Tu peux me dire à quel endroit s'arrête le programme ? (où se place le curseur après qu'il t'ai affiché le Syn Error)


Ah, je précise que si tu as une Graph 35+ (sans la mention USB), le programme n'est pas compatible. Tu devrais une erreur syntaxe vers un While à peu près si c'est le cas.
guiwake
Statut : Invité
Posté le 09-06-2013 à 12:35 | #
comment je fais pour savoir ca ?
c'est une graph 65 que j'ai
ShykedHors ligneMembrePoints: 272 Défis: 20 Message
Posté le 09-06-2013 à 13:31 | #
Les 65 ont peut-être pas cette fonction. Sur certaines calculatrices, dès qu'un programme a une erreur, le programme est ouvert en mode édition pour afficher où a eue lieu l'erreur.

J'ai copié le début du programme, essaie de supprimer les lignes que j'ai mis en gras et dis-moi si quelque chose s'affiche. Si quelque chose s'affiche mais que rien ne se passe d'autre, c'est que les graph 65 sont dans le même cas que les 35+ non USB.
Lbl 0
ClrText
1->A
4->B
0->D~E
Locate 10,7,".."
Do
If A=1
Then Locate 1,1,"1.Suites"
Locate 1,2,"2.Suites2"
Locate 1,3,"3.Vecteurs"
Locate 1,4,"4.Derivees"
Locate 1,5,"5.Stats"
Locate 1,6,"6.Equa cart"
Else If A=2
Then Locate 1,1,"7.Scalaire"
Locate 1,2,"8.Exponentielle"
Locate 1,3,"9.Proba"
Locate 1,4,"10.Vecteurs espace"
Locate 1,5,"11.Trigo"
Locate 1,6,"99.Ancien"
Else If A=3
Then Locate 1,1,"12.Complexes"
Locate 1,2,"13.Logarithme"
Locate 1,3,"14.Integrales"
Locate 1,4,"15.Complexes+"
Locate 1,5,"16.Proba densit#E60A"
Locate 1,6,"17.Loi normale"
Else If A=4
Then Locate 1,1,"18.Norm+Binomial"
Locate 1,2,"19.Scalaire espace"
Locate 1,3,"20.Echant Estim"
Locate 1,6,"00.Outils"
IfEnd
IfEnd
IfEnd
IfEnd
Locate 1,7," "
Locate 21,7," "
A>1=>Locate 1,7,"#E69A"
A<B=>Locate 21,7,"#E69B"
Do
[b]While Getkey<>0
WhileEnd[/b]
0->Z


Sinon je connais quelqu'un qui a une graph 65, je pourrai lui emprunter pour faire un essai.
ZiqumuHors ligneMembre d'honneurPoints: 3052 Défis: 9 Message
Posté le 09-06-2013 à 13:36 | #
Il y a de grandes chances que les 65 soient dans le même cas que les 35+non USB, elles sont sorties à la même période et de mémoire le seul avantage de la 65 par rapport à la 35 est la couleur.
TotoyoHors ligneMembre d'honneurPoints: 15988 Défis: 102 Message
Posté le 09-06-2013 à 13:46 | #
Les anciennes Graph 35 et 65 ont les fonctions While et Getkey. D'ailleurs, grâce à Blues 35, on pouvait avoir des nuances de blues sur sa Graph 35.

Les anciennes Graph 25(+) (non PRO) n'ont pas de Getkey et l'écran est plus petite.

Pages: Précédente | 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18 | Suivante

Planète Casio v42 © créé par Neuronix et Muelsaco 2004 - 2020 | Il y a 49 connectés | Nous contacter | Qui sommes-nous ? | Licences et remerciements

Planète Casio est un site communautaire non affilié à Casio. Toute reproduction de Planète Casio, même partielle, est interdite.
Les programmes et autres publications présentes sur Planète Casio restent la propriété de leurs auteurs et peuvent être soumis à des licences ou copyrights.
CASIO est une marque déposée par CASIO Computer Co., Ltd