π
<-
Chat plein-écran
[^]

Problem programmation

Programmation et implémentation d'algorithmes.

Problem programmation

Message non lude mark » 05 Fév 2016, 15:48

Code: Tout sélectionner
Prgm
Dialog
Request "CORPO N.",asd,0
Request "CERNIERA",asd12
EndDlog

Dialog
Request "POLO CORPO"&asd&"",asdf5
Request "BIELLA",adsg
EndDlog

Dialog
Request "Ux",aux1,0
Request "Uy",aux2,0
Request "Uz",aux3,0
EndDlog

Dialog
Request "wx",aux4,0
Request "wy",aux5,0
Request "wz",aux6,0
EndDlog

Dialog
Request "x",aux7,0
Request "y",aux8,0
Request "z",aux9,0
EndDlog
Pause "BIELLA = U"&asd&"("&asd12&") ° "&adsg&"=0"
Pause "U"&asd&"("&asd12&")={"&aux1&"+"&aux2&"+"&aux3&"}+{"&aux4&"+"&aux5&"+"&aux6&"} „ "&asdf5&""&asd12&""
expr(aux1)→aux1
expr(aux2)→aux2
expr(aux3)→aux3
expr(aux4)→aux4
expr(aux5)→aux5
expr(aux6)→aux6
expr(aux7)→aux7
expr(aux8)→aux8
expr(aux9)→aux9

Pause "PRODOTTO VETTORIALE"
crossP({aux4,aux5,aux6},{aux7,aux8,aux9})→regt
Pause regt
Disp "PRODOTTO VETTORIALE"
Pause "CON TRASLAZIONE"
{aux1,aux2,aux3}+regt→xxx
Pause xxx
DelVar aux1,aux2,aux3,aux4,aux5,aux6,aux7,aux8,aux9,regt
Disp "SCRIVO LA DISTANZA"
Pause "DELLA BIELLA "&adsg&""
Dialog
Title "DISTANZA"
Request "x1",aux10,0
Request "y1",aux11,0
Request "z1",aux12,0
EndDlog
expr(aux10)→aux10
expr(aux11)→aux11
expr(aux12)→aux12
Disp "Risolvo"
Pause "U"&asd&"("&asd12&") ° "&adsg&" =0"
dotP(xxx,{aux10,aux11,aux12})→xcv
Pause xcv
expr("ux"&asd&"")→aux1
expr("uy"&asd&"")→aux2
expr("uz"&asd&"")→aux3
expr("wx"&asd&"")→aux4
expr("wy"&asd&"")→aux5
expr("wz"&asd&"")→aux6


Code: Tout sélectionner
exp►list(solve(xcv=0,aux4),aux4)→fgh
Pause fgh
exp►list(solve(xcv=0,aux5),aux5)→fgk
Pause fgk
exp►list(solve(xcv=0,aux6),aux6)→fgv
Pause fgv
exp►list(solve(xcv=0,aux1),aux1)→fgc
Pause fgc
exp►list(solve(xcv=0,aux2),aux2)→fkv
Pause fkv
exp►list(solve(xcv=0,aux3),aux3)→fjc
Pause fjc
EndIf
Pause {aux1,aux2,aux3}+{aux4,aux5,aux6} ^ asdf5&M|aux1->fgc and aux2->fkv and aux3->fjc and aux4->fgh and aux5->fgk and aux6->fgv
Pause fgv
EndPrgm



xcv is an expression and solve xcv in aux1,aux2,aux3,aux4,aux5 and aux6 but i get {} ..... why ?
And i also want to take the results and replace them in the following formula: {aux1,aux2,aux3} + {aux4,aux5,aux6} ^ asdf5&M|aux1->fgc and aux2->fkv and aux3->fjc and aux4->fgh and aux5->fgk and aux6->fgv
and see the formula in the home screen.
Avatar de l’utilisateur
mark
Niveau 3: MH (Membre Habitué)
Niveau 3: MH (Membre Habitué)
Prochain niv.: 36%
 
Messages: 9
Inscription: 02 Juin 2015, 16:36
Genre: Non spécifié
Calculatrice(s):
MyCalcs profile

Re: Problem programmation

Message non lude Bisam » 08 Fév 2016, 10:04

You have many bad habits in programming.
First of all, naming all your variables the same make them unusable !! How can you know what they mean, especially when the definition changes from one part of your program to another ?

I don't really understand what you're trying to do (you should give an example, with a photo if you have one) but your last lines can't work because you can't solve a same expression to each of its variables separately ! And you can't write an expression something|foo=bar as you did.

Once again, give more explanations. I'm sure your code is way more complicated that it should.
Avatar de l’utilisateur
BisamAdmin
Niveau 15: CC (Chevalier des Calculatrices)
Niveau 15: CC (Chevalier des Calculatrices)
Prochain niv.: 69.5%
 
Messages: 5665
Inscription: 11 Mar 2008, 00:00
Localisation: Lyon
Genre: Homme
Calculatrice(s):
MyCalcs profile


Retourner vers Programmation

Qui est en ligne

Utilisateurs parcourant ce forum: Aucun utilisateur enregistré et 28 invités

-
Rechercher
-
Social TI-Planet
-
Sujets à la une
Comparaisons des meilleurs prix pour acheter sa calculatrice !
Aidez la communauté à documenter les révisions matérielles en listant vos calculatrices graphiques !
Phi NumWorks jailbreak
123
-
Faire un don / Premium
Pour plus de concours, de lots, de tests, nous aider à payer le serveur et les domaines...
Faire un don
Découvrez les avantages d'un compte donateur !
JoinRejoignez the donors and/or premium!les donateurs et/ou premium !


Partenaires et pub
Notre partenaire Jarrety Calculatrices à acheter chez Calcuso
-
Stats.
937 utilisateurs:
>918 invités
>14 membres
>5 robots
Record simultané (sur 6 mois):
6892 utilisateurs (le 07/06/2017)
-
Autres sites intéressants
Texas Instruments Education
Global | France
 (English / Français)
Banque de programmes TI
ticalc.org
 (English)
La communauté TI-82
tout82.free.fr
 (Français)