Forum TI-Planet.org

Bonjour, j'ai un soucis avec le programme que j'essaye de développer.

Code: Select all

Define LibPub créditbail()=
Prgm
Local dp,x,p,m,o,d
Request "Versement début de période ? (1=oui, 0=non) ",dp
Request "Montant de l'emprunt= ",x
Request "Nombre de période= ",p
Request "Montant de la redevance= ",m
Request "Montant de l'option d'achat= ",o
Request "Montant du dépôt de garantie= ",d
If dp=1 Then
Disp solve(x-d=m+m(((1-(1+i)^(−p-1))/(i)))+(o-d)[(1+i)^(−p)],i)
Else
Disp solve(x-d=m(((1-(1+i)^(−p))/(i)))+(o-d)[(1+i)^(−p)],i)
EndIf
EndPrgm

Quand je décide de l'exécuter et que je rentre les variables, j'ai ce message d'erreur : "Erreur : Ce n’est pas un nom de fonction.". Avez vous une idée pour faire fonctionner ce programme ?

le problème vient des crochets je pense remplace les par des parenthèses
Disp solve(x-d=m+m(((1-(1+i)^(−p-1))/(i)))+(o-d)*((1+i)^(−p)),i)

Je viens de les enlever, j'ai toujours le même message d'erreur :/

donnes tes données je testes chez moi

Versement début de période : 1
Montant : 80 000
Nb période : 16
Montant redevance : 5 045
Montant option achat : 5 345
Montant dépôt de garantie : 3 000.

l'erreur c'est que tu as oublier de mettre le signe de multiplication après le m

Code: Select all

Define LibPub créditbail()=
Prgm
Local dp,x,p,m,o,d
Request "Versement début de période ? (1=oui, 0=non) ",dp
Request "Montant de l'emprunt= ",x
Request "Nombre de période= ",p
Request "Montant de la redevance= ",m
Request "Montant de l'option d'achat= ",o
Request "Montant du dépôt de garantie= ",d
If dp=1 Then
Disp solve(x-d=m+m*(((1-(1+i)^(−p-1))/(i)))+(o-d)*((1+i)^(−p)),i)
Else
Disp solve(x-d=m*(((1-(1+i)^(−p))/(i)))+(o-d)*((1+i)^(−p)),i)
EndIf
EndPrgm

essaies ça normalement ça devrait marcher

Merci cela fonctionne parfaitement.

Bonne journée

Bonjour j'ai le même problème avec mon programme. Je veux calculer l'intervalle de fluctuation asymptotique au seuil 0.95. n la taille de l'échantillon, p la probalbilité.

Code: Select all

Define LibPriv fluct1()=
Prgm
:Local n,p,a,b
:Request "taille de l echantillon",n
:Request "probabilite de l evenement",p
:Disp solve(a=p-1.96*√(((p(1-p))/(n))),a)
:Disp solve(b=p+1.96*√(((p(1-p))/(n))),b)
:EndPrgm

le programe est ci dessus.
J'aimerais qu'il maffiche à la fois la borne infèrieure(a) et la borne supèrieure (b).
Des valeurs qui fonctionnent sont:
n=500
p=0,5
alors on devrait avoir :
a= 0,456
b= 0,544 (les valeurs ont approximatives)

Merci d 'avance pour votre aide

Bonsoir,

Je vois dans ton programme p(1-...), l'a calculatrice comprend donc que p est une fonction alors que c'est une variable (0.5 dans ton example).

Il faut taper p*(1-p).

merci pour cette précision: ma calculette n affiche plus cette erreur précise.
Par contre mon programme ne fonctionne toujours pas.
Pourrait on m'aider s'il vous plait pour qu'e le programme marche. ( je suis archi nul en programmation)

Merci d'avance

PS: c'est un problème d'argument et ma calculatrice est une nspire cx cas