| Aide pour écrire un programme |
| Auteur |
Message |
manouxe59
Autorisation : Membre
Nb de messages : 4
Inscrit le : Dim 29 Jan 2012, 17:20
|
Posté le : Dim 29 Jan 2012, 17:23
|
|
|
Bonjour,
J'ai un problème pour écrire le programme que je souhaite utiliser, que j'ai d'ailleurs eu sur votre site Le voici :
Code
Normal
Float
ClrHome
Input "RADICAL ",N
iPart(rac(N))->I
While not(fPart(N/I^2
I-1->I
End
If N/I=I
Then
Disp I
Stop
End
If I=1
Then
Disp "NON SIMPLIFIABLE"
Stop
End
I^2->C
ClrHome
Disp "rac("," "
Output(1,4,N
iPart(log(I))+1->E
Output(2,1,I
Output(2,E+2,"rac(
Output2,E+5,N/I^2
Je ne trouve pas les codes comme "iPart", "ClrHome", "Float", "While not" ...
Merci de vos futures réponses 
|
 |
|
| |
azerty1
Autorisation : Membre
Nb de messages : 438
Inscrit le : Dim 12 Déc 2010, 20:44
|
Posté le : Dim 29 Jan 2012, 18:10
|
|
|
Si tu as une Ti82stats.fr alorsles fonctions sont traduites,à savoir:
iPart -> partEnt
fPart -> partDèc
ClrHome -> EffEcr
Float se trouve dans la touche [mode]
While se trouvent dans [prgm] + [5] et not( dans [2nde] + [math] + droite + [4]
Voilà voilà, sinon je t'invite à consulter le sujet de linkakro il me semble,sur la tradutions française/anglaise (attend que je le retrouve)
Sinon si c'est juste un problème pour les trouver sache qu'elles sont toutes dispo dans le catalogue [2nde] + [0]
---------------------- Ti-Connect 64bits
PROTECT |
 |
|
| |
manouxe59
Autorisation : Membre
Nb de messages : 4
Inscrit le : Dim 29 Jan 2012, 17:20
|
Posté le : Lun 30 Jan 2012, 13:11
|
|
|
Merci beaucoup. Mais j'ai un autre problème, j'ai fini de recopier le programme et quand je le lance, et que je met rac(72 je devrais avoir 6rac(2, or le résultat est 8rac(1,125 ??
|
 |
|
| |
linkakro
Autorisation : Membre
Nb de messages : 3738
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Lun 30 Jan 2012, 14:34
|
|
|
Ce code me dit quelque chose...
Je crois que c'est mon programme.
Lorsque le programme demande "radical", il faut écrire 72 mais pas rac(72).
J'espère que c'est seulement ça.
---------------------- 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 |
 |
|
| |
manouxe59
Autorisation : Membre
Nb de messages : 4
Inscrit le : Dim 29 Jan 2012, 17:20
|
Posté le : Lun 30 Jan 2012, 18:48
|
|
|
Et bien non justement, je met bien seulement "72" et le résultat m'affiche 8rac(1.125) ... :/
|
 |
|
| |
manouxe59
Autorisation : Membre
Nb de messages : 4
Inscrit le : Dim 29 Jan 2012, 17:20
|
Posté le : Lun 30 Jan 2012, 18:50
|
|
|
J'ai juste enlevé le « " » à l'avant dernière ligne, car quand je lançais le programme il m'indiquait une erreur à cet endroit .
|
 |
|
| |
linkakro
Autorisation : Membre
Nb de messages : 3738
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Lun 30 Jan 2012, 21:08
|
|
|
Tu peux réécrire toute la fin mais ce sera moins joli.
| Code | // fin du programme
ClrHome
Disp I,"rac(",N/I^2 |
---------------------- 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 |
 |
|
| |
manouxe59
Invité
|
Posté le : Lun 30 Jan 2012, 21:53
|
|
|
Que signifie //fin du programme ?
Et toute la fin, c'est à dire ? à partir de où ? ^^
Je peux paraître bête mais je ne m'y connais pas du tout xD
|
| |
|
| |
manouxe59
Invité
|
Posté le : Lun 30 Jan 2012, 21:55
|
|
|
J'ai réussie, mais ça doit être une erreur autre part, car certes l'affichage est différent, mais le résultat toujours le même : 8rac(1.125
|
| |
|
| |
linkakro
Autorisation : Membre
Nb de messages : 3738
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Mar 31 Jan 2012, 0:06
|
|
|
J'avais peur qu'il y ait un problème à cause de la formule du log. (elle sert à calculer la taille du nombre pour placer les autres affichages, non-seulement facultative mais aussi prise de tête)
Je ne sais pas trop ce qui cause cette erreur de calcul mais j'ai quelques certitudes :
-le programme s'arrête lorsque I=8
-8*1.125=9 et 8*9=72
-le programme doit commencer à l'entier de la racine de 72 id est 8.
Vérifie surtout
While not(fPart(N/I^2
aucune parenthèse à fermer et le symbole "^2" se rapporte à I. On peut l'écrire avec [^]+[2] ou bien avec la touche du I (x²).
---------------------- 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 |
 |
|
| |