| Listes... |
| Auteur |
Message |
azerty1
Autorisation : Membre
Nb de messages : 438
Inscrit le : Dim 12 Déc 2010, 20:44
|
Posté le : Sam 11 Jui 2011, 18:28
|
|
 |
J'ai récemment fais une remarque... Quand on rentre un nombre trop grand dans une liste (des 7chiffres), il est arrondit avec une puissance de 10... on perd donc le nombre de base...
exemple: si on rentre 1111111, on obtient 1.11E6...
----------------------
Ti-Connect 64bits
PROTECT |
 |
  |
| |
Sangohan38
Autorisation : Membre
Nb de messages : 3293
Inscrit le : Sam 31 Déc 2005, 19:48
|
Posté le : Sam 11 Jui 2011, 18:30
|
|
|
Il n'est arrondis que lorsque tu dépasse le nombre de chiffres significatifs que la calculatrice peut avoir en mémoire soit 15 (oui, 2 chiffres ne s'affichent pas mais sont stockés en mémoire me semble).
Sangohan38
|
| |
|
| |
azerty1
Autorisation : Membre
Nb de messages : 438
Inscrit le : Dim 12 Déc 2010, 20:44
|
Posté le : Sam 11 Jui 2011, 18:34
|
|
|
Je viens de tester, et effectivement, mais s'il n'apparaissent pas, les 10premiers chiffres sont retenus quand on rappel la valeur, après, le nombre est réellement arrondit..
----------------------
Ti-Connect 64bits
PROTECT |
| |
|
| |
sandro
Autorisation : Membre
Nb de messages : 1366
Inscrit le : Ven 25 Mar 2011, 22:58
|
Posté le : Sam 11 Jui 2011, 18:44
|
|
|
En trichant un peu, on peu réellement optenir les 14 premières décimales (sous forme de chaîne.
Sandro
----------------------
mort à l'inutile, place à la mémoire libre et aux programmes |
| |
|
| |
azerty1
Autorisation : Membre
Nb de messages : 438
Inscrit le : Dim 12 Déc 2010, 20:44
|
Posté le : Sam 11 Jui 2011, 19:03
|
|
|
Tu pourrais expliciter ta méthode s'il te plaît...?
----------------------
Ti-Connect 64bits
PROTECT |
| |
|
| |
sandro
Autorisation : Membre
Nb de messages : 1366
Inscrit le : Ven 25 Mar 2011, 22:58
|
Posté le : Sam 11 Jui 2011, 19:34
|
|
|
Voici ce que javais fais à la va-vite (je me suis ensuite rendu compte que ça ne me servais à rien pour mon projet, donc je n'ai pas continué à chercher à amméliorer.
| Code | PROGRAME : NBACHAIN
Prompt A
DelVar L1If not(A
Then
" 0 -> Str0
Else
abs(A -> B
fPart(B -> C
DelVar D
While fPart(C[10^(]D
D+1 -> D
End
1+iPart(log(B -> C
DelVar EFor([théta],C,1-D,-1
E+1 -> E
iPart(B/[10^(][théta]-1 -> L1(E
B-[10^(][théta]-1)L1(E -> B
End
If A<0
Then
" -" -> Str0 //2nd guillemet à enlever
Else
" " -> Str0 //2nd guillemet à enlever
End
For([théta],1,C
prgmNAC
End
If D
Then
Str0+"." -> Str0 //2nd guillemet à enlever
For([théta],C+1,D+C
prgmNAC
End
End
End
sub(Str0,2,length(Str0)-1 -> Str0 |
| Code | PROGRAME : NAC
If not(L1([théta]
Str0+"0 -> Str0
If 1=L1([théta]
Str0+"1 -> Str0
If 2=L1([théta]
Str0+"2 -> Str0
If 3=L1([théta]
Str0+"3 -> Str0
If 4=L1([théta]
Str0+"4 -> Str0
If 5=L1([théta]
Str0+"5 -> Str0
If 6=L1([théta]
Str0+"6 -> Str0
If 7=L1([théta]
Str0+"7 -> Str0
If 8=L1([théta]
Str0+"8 -> Str0
If 9=L1([théta]
Str0+"9 -> Str0 |
Ce programme affiche 14 chiffres significatifs dont le dernier est un arrondis, avec placement de la virgule.
Malheureusement, il n'est pas très rapide.
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 : Sam 11 Jui 2011, 19:50
|
|
|
VALSTR
| Code | Prompt C
If C=0
Disp "0"
If C=0
Stop
abs(C->A
"."->Str1
"0123456789"->Str2
0->W
While iPart(A10^(-W
W+1->W
iPart(10fPart(A10^(-W->B
sub(Str2,B+1,1)+Str1->Str1
End
0->W
While fPart(A10^(W
iPart(10fPart(A10^(W)->B
Str1+sub(Str2,B+1,1)->Str1
W+1->W
End
If not(fPart(C))
sub(Str1,1,length(Str1)-1)->Str1
If C<0
"-"+Str1->Str1
Disp Str1 |
Je vois que tu as eu des idées qui se rapprochent des miennes 
----------------------
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 |
| |
|
| |
