| k=a+racine(b) avec k connu |
| Auteur |
Message |
sandro
Autorisation : Membre
Nb de messages : 1366
Inscrit le : Ven 25 Mar 2011, 22:58
|
Posté le : Jeu 30 Jui 2011, 20:53
|
|
|
Bonjour/bonsoir,
je vous poste un petit programme que j'ai fait ce soir qui permet de trouver un nombre de la forme a+racine(b) à partir d'un nombre décimal.
| Code | FnOff
PlotsOff
Prompt A
While A
ClrDraw
ClrHome
iPart(A->B
fPart(A->C
Delvar Z
Repeat 0=round(fPart((C+Z)²),5) or 1=round(fPart((C+Z)²),5
Z+1 -> Z
End
Text(1,1,B-Z,"+racine(",(C+Z)²,")"
DispGraph
Pause
Prompt A
End |
Seuls inconvéniant, a et b doivent être des entiers naturels ; si a est entier, on optient a-1"+racine(1)".
Sandro
---------------------- mort à l'inutile, place à la mémoire libre et aux programmes |
 |
|
| |
linkakro
Autorisation : Membre
Nb de messages : 3738
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Ven 01 Juil 2011, 13:31
|
|
|
L'avant dernier A est le caractère spécial "Á" qui représente thêta.
Alors je me pose des questions. D'autant que le programme ne marche pas correctement pour moi.
---------------------- 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 |
 |
|
| |
sandro
Autorisation : Membre
Nb de messages : 1366
Inscrit le : Ven 25 Mar 2011, 22:58
|
Posté le : Ven 01 Juil 2011, 13:35
|
|
|
Désolé, c'est un Z qu'il faut mettre, au dépar c'était théta partout, mais en recopiant, j'ai remplacé par Z mais j'ai oublié celui-là : j'édite.
Sandro
---------------------- mort à l'inutile, place à la mémoire libre et aux programmes |
 |
|
| |
linkakro
Autorisation : Membre
Nb de messages : 3738
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Ven 01 Juil 2011, 13:40
|
|
|
Même remplacer le Z ne marche toujours pas. J'obtiens toujours A+rac(1.
---------------------- 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 |
 |
|
| |
sandro
Autorisation : Membre
Nb de messages : 1366
Inscrit le : Ven 25 Mar 2011, 22:58
|
Posté le : Ven 01 Juil 2011, 13:49
|
|
|
Tu as mis quoi comme nombre? Essaye par example avec 2+racine(2) et donne moi le résultat.
Merci d'avance
Sandro
---------------------- mort à l'inutile, place à la mémoire libre et aux programmes |
 |
|
| |
linkakro
Autorisation : Membre
Nb de messages : 3738
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Ven 01 Juil 2011, 13:51
|
|
|
2+racine(2) donne 2+racine(1.
---------------------- 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 |
 |
|
| |
sandro
Autorisation : Membre
Nb de messages : 1366
Inscrit le : Ven 25 Mar 2011, 22:58
|
Posté le : Ven 01 Juil 2011, 13:59
|
|
|
Bizard, je ne trouve pas pourquoi, mais essaye avec ça :
| Code | 1 -> A
While A
Prompt A
ClrDraw
ClrHome
iPart(A->B
fPart(A->C
0 -> Z
Repeat 0=round(fPart((C+Z)²),5) or 1=round(fPart((C+Z)²),5
Z+1 -> Z
End
Text(1,1,B-Z,"+racine(",(C+Z)²,")"
DispGraph
Pause
End |
C'est le code que j'ai moi sur la TI, je l'ai modifier au recopiage (je ne voie pas d'où peut venir la différence!
Essaye toujurs, même si je commence à trouver ça bizzard ...
Merci d'avance
Sandro
---------------------- mort à l'inutile, place à la mémoire libre et aux programmes |
 |
|
| |
linkakro
Autorisation : Membre
Nb de messages : 3738
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Ven 01 Juil 2011, 15:47
|
|
|
L'erreur venait bien de moi. Une erreur de syntaxe empêchait un sto d'agir.
Maintenant les deux programmes fonctionnent. Merci.
---------------------- 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 |
 |
|
| |