Gamme TI-82
Partager sur Facebook Fil RSS Imprimer la page
Cacher les résultats

Résultat de la recherche



Poster un nouveau sujet Poster une réponse
Recherche programme RDM
Auteur Message
Arthuro
Invité
Posté le : Lun 11 Avr 2011, 19:48   Citer 

bonsoir je recherche un programme pour ma ti 82 stats fr qui permetterai de calculer les moments quadratiques et ou tout autre calcul relation lié au dimensionnement (flexion traction )
merci

  Haut de page Bas de page 
 
linkakro



Autorisation : Membre
Nb de messages : 3774
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Mar 12 Avr 2011, 0:22   Citer 

Ces notions de mécanique ne sont pas de mon niveau (TSSI) ! extraterre.gif
Si les formules ne sont pas trop complexes, je pourrai peut-être les adapter.
Indique moi les formules et ta démarche pour que je voie quoi faire.

A moins qu'un autre membre suive ces études.

----------------------
ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)

Pour tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store
 Adresse email Haut de page Bas de page 
 
Arthuro
Invité
Posté le : Mar 12 Avr 2011, 19:17   Citer 

tan(2a)=(-2*(Igyz))/(Igy-Igz)
Igy'=Igy*cos²(a)+Igz*sin²(a)-Igyz*sin(2a)
Igz'=Igy*sin²'a)+Igz*cos²(a)+Igyz*sin(2a)

=> resortir a(en degré),Igy' et Igz' (connaissant Igyz,Igy et Igz)

  Haut de page Bas de page 
 
Arthuro



Autorisation : Membre
Nb de messages : 8
Inscrit le : Lun 11 Avr 2011, 19:44
Posté le : Mar 12 Avr 2011, 19:36   Citer 

sinon j'avais commencer a faire ca mais je n'avais pas eu le courage de le programmer ...

http://www.megaupload.com/?d=COG11V5P

 Adresse email Haut de page Bas de page 
 
linkakro



Autorisation : Membre
Nb de messages : 3774
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Mar 12 Avr 2011, 23:12   Citer 

Pour le premier système, c'est mort en ce qui me concerne.

Je ne sais pas du tout où je vais, mais je traduirai ta feuille de calculs (bien que tu me semble connaître le principe du ti-basic). Des boucles pourraient éviter une copie totale et bourrine.
Q et P sont-elles des inconnues ?

----------------------
ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)

Pour tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store
 Adresse email Haut de page Bas de page 
 
Google_AdSense



Publicité    



 
Arthuro



Autorisation : Membre
Nb de messages : 8
Inscrit le : Lun 11 Avr 2011, 19:44
Posté le : Mer 13 Avr 2011, 15:26   Citer 

q et p sont connus

 Adresse email Haut de page Bas de page 
 
linkakro



Autorisation : Membre
Nb de messages : 3774
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Sam 16 Avr 2011, 12:52   Citer 

Chaque fois que tu fais P*x où Q*x ou autre produit par x, dépendent-ils du segment étudié ? Si oui, comment ?

Je bidouille le cas où P Q et x sont des constantes.

EDIT= Voici ma première version.

Code
"ABCDE->Chaîne1
EffVar A
EffVar B
EffVar C
EffVar D
EffList L1,L2,L3
Prompt P,Q,X
X->Z
For(W,1,5
Disp "POINT "+sous-chaîne(Chaîne1,W,1
Prompt X,Y,N
A-X->A
B-Y->B
C-N->C
A-PZ->L1(W
B-QZ->L2(W
C-BZ+QZ^2/2->L3(W
End
Disp "N
Pause L1
Disp "TY
Pause L2
Disp "MFX
Pause L3



----------------------
ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)

Pour tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store
 Adresse email Haut de page Bas de page 
 
Arthuro



Autorisation : Membre
Nb de messages : 8
Inscrit le : Lun 11 Avr 2011, 19:44
Posté le : Sam 16 Avr 2011, 13:46   Citer 

en fait ce qu'il faut sortir sont des equatios qui represente l'evolution des contrainte normale(N) , tangentielle(Ty) et le moment de flexion (mfz) en fonction de la position sur la poutre d'où le x !
en espérant que ça réponde a ta question et oui P et Q sont des constantes !
merci

 Adresse email Haut de page Bas de page 
 
Arthuro



Autorisation : Membre
Nb de messages : 8
Inscrit le : Lun 11 Avr 2011, 19:44
Posté le : Mer 11 Mai 2011, 21:29   Citer 

Il y a qqun ?

 Adresse email Haut de page Bas de page 
 
linkakro



Autorisation : Membre
Nb de messages : 3774
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Mer 11 Mai 2011, 21:56   Citer 

Je croyais que cela suffisait.

Quelle est la variable à exprimmer selon les autres ? (puisqu'apparamment l'étude numérique ne te convient pas)

----------------------
ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)

Pour tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store
 Adresse email Haut de page Bas de page 
 
Arthuro



Autorisation : Membre
Nb de messages : 8
Inscrit le : Lun 11 Avr 2011, 19:44
Posté le : Jeu 12 Mai 2011, 15:58   Citer 

la variable c'est x qui repr"sente la position de la section dans la poutre et il faudrait que le programme affiche les 12 equations
merci

 Adresse email Haut de page Bas de page 
 
sandro
Avatar

Autorisation : Membre
Nb de messages : 1387
Inscrit le : Ven 25 Mar 2011, 22:58
Posté le : Jeu 12 Mai 2011, 16:18   Citer 

Aucune idée si ça te convient, mais ceci devrais correspondre à ce message

Citer
tan(2a)=(-2*(Igyz))/(Igy-Igz)
Igy'=Igy*cos²(a)+Igz*sin²(a)-Igyz*sin(2a)
Igz'=Igy*sin²'a)+Igz*cos²(a)+Igyz*sin(2a)

=> resortir a(en degré),Igy' et Igz' (connaissant Igyz,Igy et Igz)



Code
:ClrHome
:Input "IGYZ:",B
:Input "IGY:",C
:Input "IGZ:",D
:Degree
:.5arctan(-2B/(C-D -> A          //devant le 2 c'est le moins entre parrenthèses
:C*cos(A)²+D*sin(A)²-B*sin(2A -> E
:C*sin(A)²+D*cos(A)²+B*sin(2A) -> F
:Disp "A(EN°)=","IGY'=","IGZ'=
:{A,E,F -> Liste1
:Output(4,8,A
:Output(5,6,E
:Output(6,6,F
:



En espérent que ça te serve à quelque chose (en première et avec la rougeole, je n'étais pas en état de comprendre les 5 pages de calculs)
Sandro

EDIT : carractères qui devennait des ensembles de signes corrigés

----------------------
mort à l'inutile, place à la mémoire libre et aux programmes
 Adresse email Haut de page Bas de page 
 
linkakro



Autorisation : Membre
Nb de messages : 3774
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Jeu 12 Mai 2011, 20:22   Citer 

sandro : corrige les problèmes de caractères unicode.

Arthuro : alors tu veux une antisêche des équations ou une résolution d'équation ?

----------------------
ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)

Pour tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store
 Adresse email Haut de page Bas de page 
 
Sangohan38



Autorisation : Membre
Nb de messages : 3391
Inscrit le : Sam 31 Déc 2005, 19:48
Posté le : Jeu 12 Mai 2011, 23:15   Citer 


Citer : Arthuro
[...]calculer les moments quadratiques et ou tout autre calcul relation lié au dimensionnement (flexion traction )


Relis mieux Linkakro, il demande bien une résolution d'équation.

Y-a-t'il des cas précis pour calculer ces moments où tu peut te retrouver avec n'importe quelle surface?

Sangohan38

----------------------
 Adresse email Haut de page Bas de page 
 
Arthuro



Autorisation : Membre
Nb de messages : 8
Inscrit le : Lun 11 Avr 2011, 19:44
Posté le : Ven 13 Mai 2011, 18:28   Citer 

ce que je veux c'est un programme qui écrit(et non résout) les équations a ma place et pas pour tricher mais plutôt pour gagner du temps et faire des vérifs

 Adresse email Haut de page Bas de page 
 
sandro
Avatar

Autorisation : Membre
Nb de messages : 1387
Inscrit le : Ven 25 Mar 2011, 22:58
Posté le : Sam 14 Mai 2011, 13:22   Citer 

Salut
Peut-être que ce programme-ci fait l'affaire :

Code
:ClrHome
:Input "IGYZ=",Str1
:Input "IGY=",Str2
:Input "IGZ=",Str3
:ClrHome
:Output(1,1,"tan(2a)=(-2*(IGYZ))/(IGY-IGZ)
:Pause
:ClrHome
:Output(1,1,"IGY'=IGY*cos(a)²+IGZ*sin(a)²-IGYZ*sin(2a)
:Pause
:ClrHome
:Output(1,1,"IGZ'=IGY*sin(a)²+IGZ*cos(a)²+IGYZ*sin(2a)
:Pause
:ClrHome
:Output(1,1,"tan(2a)=(-2*("+Str1+"))/("+Str2+"-"+Str3+")
:Pause
:ClrHome
:Output(1,1,"IGY'="+Str2+"*cos(a)²+"+Str3+"*sin(a)²-"+Str1+"*sin(2a)
:Pause
:ClrHome
:Output(1,1,"IGZ'="+Str2+"*sin(a)²+"+Str3+"*cos(a)²+"+Str1+"*sin(2a)
:Pause
:ClrHome
:Input "a=",Str4
:Output(1,1,"IGY'="+Str2+"*cos("+Str4+")²+"+Str3+"*sin("+Str4+")²-"+Str1+"*sin(2*"+Str4+")
:Pause
:ClrHome
:Output(1,1,"IGZ'="+Str2+"*sin("+Str4+")²+"+Str3+"*cos("+Str4+")²+"+Str1+"*sin(2*"+Str4+")
:Pause
:ClrHome



Ce programme ne fait que afficher les formules d'abord litéralles, puis en remplaçant Igyz, Igy et Igz par leurs valeures numériques ,puis en remplaçant a par ça valeur à condition de l'entrer.

En espérent t'aider
Sandro

PS : ce programme ne remplace pas par des valeurs mais par des chaînes de carractères : si tu entre "2+2", dans le calcul du aura "2+2" ; si tu entre racine carré de 23 , tu obtindra le signe racine carrée suivit de "23)" ; si tu entre "2x²y+3" , tu obtiendra "2x²y+3" ; ...
Attention : si tu entre une somme ou une différence, entoure la de parenthèses (2+3*4 est différend de (2+3)*4 LOL)

----------------------
mort à l'inutile, place à la mémoire libre et aux programmes
 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 - 2016 Groupe FSB
Page générée en 9 requêtes
BlackOne par Grimmlink
 

Site hébergé par Free Page sous licence creative commons Page validée par le W3C (XHTML 1.0 Transitional) Feuille de style validée par le W3C Flux RSS 2.0 valide Page étiquetée par l'ICRA Page testée par Ocawa