Avertissement :Il s'agit d'une page optimisée pour la navigation mobile. Voir la
page originale.
Pysique 2nd
el barto le 26/03/2010 à 18:55
Salut tout le monde j'ai créé 5 programmes:
le 1er:newton,il calcul la force d'attraction entre deux corps(64)
le 2nd:newton 2,il calcul le poid d'1 corps par raport a un autre(72)
le 3eme:temperature,il convertit les temperatures(402)
le 4eme:premier(je l'ai trouvé sur se site,mais je sais plus qui c'est qui la fait)(163)
le 5eme:c'est un dé (20)
le 6eme:il reli les 4 premiers(173)
Newton
Code
EffEcr
Disp "MA"
Input X
Disp "MB"
Input Y
Disp "DAB"
Input Z
6.67e-11*X*Y/(Z)2>A
Disp A
Newton2
Code
EffEcr
Disp "MA"
Input A
Disp "MB"
Input B
Disp "DIAMETRE A"
Input C
6.67e-11*A*A/(C)2>D
Disp D
Temperature
Code
EffEcr
Lbl 8
Menu("MENU","CF",1,"FC",2,"KF",3,"fk",4,"KC",5,"CK",6,"QUITTER",7
Lbl 7
prgmPHISIQUE
Lbl 1
EffEcr
Disp "UNE TEMPERATURE"
Input A
(((A*9)/5)+32)>A
Disp A
Pause :Goto 8
Lbl 2
EffEcr
Disp "UNE TEMPERATURE"
Input B
(((B-32)*5)/9)>B
Disp B
Pause :Goto 8
Lbl 3
EffEcr
Disp "UNE TEMPERATURE"
Input C
(((C-273)*9)/5)+32>C
Disp C
Pause :Goto 8
Lbl 4
EffEcr
Disp "UNE TEMPERATURE"
Input D
(((D-32)*5)/9)+273>D
Disp D
Pause Goto 8
Lbl 5
EffEcr
Disp "UNE TEMPERATURE"
Input E
E-273>E
Disp E
Pause :Goto 8
Lbl 6
EffEcr
Disp "UNE TEMPERATURE"
Input F
F+273>F
Disp F
Pause :Goto 8
Premier
Code
EffEcr
Input "A:",A
ent(V(A))>F:1>E:0>X
ent(A/2)>G:A/2>H
If G=H et A=2:Goto 2
Lbl A
X+1>X
A/X>B:ent(A/X)>D
If B=D:E+1>E
If E=3:Goto 2
If X=F:Goto 1
Goto A
Lbl 1
Output(2,1,"PREMIER")
Stop
Lbl 2
Output(2,1,"PAS PREMIER")
Stop
De
Code
entAléat(1,X) [X=le nombre que vous voulez]
Physique
Code
EffEcr
Lbl A
Menu("MENU","GAVITATION",1,"FORCEDATTRACTION",2,"CONVERTION",3,"NOMBRE",4,"QUITTER",5)
Lbl 5:Stop
Lbl 1
prgmNEWTON
Pause :Goto A
Lbl 2
prgm NEWTON2
Pause :Goto A
Lbl 3
prgmTEMPERATURE
Pause :Goto A
Lbl 4
prgmPREMIER
Pause :Goto A
Voilà j'ai fini, bonne chance à tous.
AlexRider38 le 26/03/2010 à 19:18
vraiment nickel
je les introduit et je les essais
bye
AlexRider38 le 28/03/2010 à 10:24
salut, j'ai modifié le programme "DÉ"
ce qui donne:
Code
:Lbl M
ClrHome
Menu("DES","LANCER",P,"QUITTER",Q
Lbl P
ClrDraw
ZStandard
AxesOff
Line(-3,2,3,2
Line(-3,-2,3,-2
Line(-3,2,-3,-2
Line(3,2,3,-2
Line(0,2,0,-2
int(6rand+1)->X ->=sto
int(6rand+1)->Y =pour TI-82
Text(28,10,"DE 1:
Text(28,71,":DE 2
Text(40,10,"SCORE:
Text(28,38,X
Text(28,53,Y
Text(40,46,X+Y
Pause
Goto M
Lbl Q
AxesOn
ClrHome
Output(1,1,"
il y a 2 dés qui sont lancés en même temps
Et je ne comprend pas la formule le prmg "NEWTON2" parce que tu demande la masse B alors que tu ne l'introduit pas dans la formule.
el barto le 28/03/2010 à 16:29
C'est parce que je me suis trompé, normalement c'est
Code
EffEcr
Disp "MA"
Input A
Disp "MB"
Input B
Disp "DIAMETRE A"
Input C
6.67e-11*A*B/(C)2>D
Disp D
Par contre c'est quoi ClrDraw (j'ai une Ti-82 Stat.fr)
Sangohan38 le 28/03/2010 à 16:31
ClrDraw=EffDessin (cf sujet "Traduction des fonctions Anglais/français").
Sangohan38AlexRider38 le 28/03/2010 à 17:59
j'ai encore amélioré le prgm "DÉ":
Code
:Lbl M
ClrHome
Menu("DES","LANCER",P,"QUITTER",Q
Lbl P
ClrHome
ZStandard
Menu("LANCER","CHOIX DES DES",C,"RETOUR,R
Lbl C
ClrHome
Output(4,1,"MAX 20
Disp "NBR DE FACES:
Input N
If N[inférieur ou égale à]20:Goto J
If N>20:Goto C
Lbl R
Goto M
Lbl J
Menu("GO","GO",G,"RETOUR",T
Lbl G
ClrDraw
ZStandard
AxesOff
Line(-3,2,3,2
Line(-3,-2,3,-2
Line(-3,2,-3,-2
Line(3,2,3,-2
Line(0,2,0,-2
int(Nrand+1)->X ->=sto
int(Nrand+1)->Y =pour TI-82
Text(28,10,"DE 1:
Text(28,71,":DE 2
Text(40,10,"SCORE:
Text(28,36,X
Text(28,51,Y
Text(40,46,X+Y
Pause
Goto J
Lbl T
Goto M
Lbl Q
AxesOn
ClrHome
Output(1,1,"
le nombre de faces étant limité a 20
AlexRider38 le 30/03/2010 à 07:26
salut, j'ai remplacé les ligne
Code
If N[inférieur ou égale à]20:Goto J
If N>20:Goto C
par
Code
If N=4:Goto J
If N=6:Goto J
If N=8:Goto J
If N=10:Goto J
If N=12:Goto J
If N=20:Goto J
If N[different de]4:Goto C
If N[different de]6:Goto C
If N[different de]8:Goto C
If N[different de]10:Goto C
If N[different de]12:Goto C
If N[different de]20:Goto C
(ce sont des nombres de faces de dés classiques
)
programath le 01/03/2011 à 16:03
Dans les ligne :
newton 1:
6.67e-11*X*Y/(Z)2>A
Newton 2:
6.67e-11*A*B/(C)2>D
Le "e" minuscule c'est quoi ?? et 2>A et 2>D je suppose que c'est 2[STO]A et 2[STO]D ?Persalteas le 01/03/2011 à 17:35
le e c'est en fait le E majuscule mais petit en taille qu'on trouve en faisant [2nd][,] et qui représente 10^(un nombre entier).
ex: E1 = 10 ; E4 = 10000 ...
donc 6.67E-11 veut dire 6.67 fois 10 puissance -11.programath le 02/03/2011 à 13:06
OK merci parsalteas !maestroarte le 07/03/2011 à 12:44
Bonjour, comment utilise t on la fonction ligne ?? Apparament on rentre entre deux parenthèses quatre nombres? A quoi correspondent ils?Je crois avoir compris l'inclinaison mais je suis pas du tout sur ni comment régler la longueur de la ligne affichée a l'écran ... Si quelqu'un pouvait m'expliquer tout ça sa serait vraiment sympa
' merci
Persalteas le 07/03/2011 à 16:13
Explication claire nette et précise:
Une ligne est définie par deux points (les extrémités.)
donc les 4 nombres correspondent aux coordonées des 2 points sur le graphique.
Ligne(X1,Y1,X2,Y2
un peu comme un vecteur en maths, mais sans la flèche au bout de la ligne
.
.... le 07/03/2011 à 22:30
Merci bien
je vais enfin pouvoir terminer mon programme:D
programath le 21/03/2011 à 22:45
Excusez moi de relancer ce topic mais le "newton 2", calcule le poids d'un corps par rapport a l'autre je peut avoir des explication ?
si j'ai bien compris il faut la masse de A, masse de B le diamètre de A ou B ?
linkakro le 21/03/2011 à 23:36
C'est écrit : "DIAMETRE A" et "input C" donc le diamètre du corps A. Avertissement :Il s'agit d'une page optimisée pour la navigation mobile. Voir la
page originale.
