J'ai crée mon premier programme en TI basic et j'aimerai le rendre plus beau et faire une code plus propre, mais je rame parce que je ne trouve pas de réponses à mes questions, et je ne comprend pas encore tout du langage.
Vous n'êtes pas obligé de regarder mon programme pour répondre aux questions, mais ça peut vous aider à mieux comprendre mes questions. C'est un petit programme (pas fini) sur le modèle de Wilson.
- Code: Select all
Define wilson(d,ca,p,tp)=
Prgm
:Request "Cout de passation et possession actuel demandé ? (0=Oui)",r
:If r=0 Then
:Request "Nombres de commandes ou quantité commandé ? (0=Quantité)",ra
:If ra=0 Then
:Request "Quantité par commandes",qac
:((d)/(qac))→nac
:Else
:Request "Nombres de commandes",nac
:((d)/(nac))→qac
:EndIf
:ca*nac→clac
:((qac)/(2))*p*tp→cpac
:clac+cpac→ctac
:Disp ""
:Disp "Quantités commandés actuel",qac
:Disp "Nombres de commandes actuel",nac
:Disp "Cout de passation actuel",clac
:Disp "Cout de possession actuel",cpac
:Disp "Cout total actuel",ctac
:EndIf
:√(((2*ca*d)/(p*tp)))→qop
:((d)/(qop))→nop
:ca*((d)/(qop))→clop
:((qop)/(2))*p*tp→cpop
:clop+cpop→ctop
:Disp ""
:Disp "Quantités commandés optimales",qop
:Disp "Nombres de commandes optimales",nop
:Disp "Cout de passation optimale",clop
:Disp "Cout de possession optimale",cpop
:Disp "Cout total optimale",ctop
:EndPrgm
Exemple de ce que ça donne :
wilson(1000,50,20,0.08)
Cout de passation et possession actuel demandé ? (0=Oui) 0
Nombres de commandes ou quantité commandé ? (0=Quantité) 0
Quantité par commandes 100
Quantités commandés actuel 100
Nombres de commandes actuel 10
Cout de passation actuel 500
Cout de possession actuel 80.
Cout total actuel 580.
Quantités commandés optimales 250.
Nombres de commandes optimales 4.
Cout de passation optimale 200.
Cout de possession optimale 200.
Cout total optimale 400.
Voici mes questions :
- Peut on ne pas afficher Request ? je voudrais seulement l'avoir en fenêtre et non en réponse
- Lorsque ma fenêtre s'affiche pour demander de saisir une variable, le texte est coupé, tout ne s'affiche pas, il y a t'il un moyen de remédier à cela ? (j'ai essayé texte, mais ça met une étape en plus inutile)
- Il y a t'il un moyen plus propre pour passer une ligne que : Disp " "
Ensuite j'aimerai afficher les noms des variables lorsque j'appelle le programme wilson, je m'explique :
Au lieu de m'afficher wilson(), cela m'afficherai wilson(d,ca,p,tp)
Pour savoir dans quel ordre je dois rentrer mes valeurs, sans devoir jeter un œil sur le code.
Voilà, je tiens à m’excuser si mes questions sont pas clairs ou si elles ont déjà été posé (je n'ai pas trouvé, après c'est pas facile à formuler). Au pire sa centralise des questions dans le même thème.
Merci d'avance pour vos réponses !