MinceBen a écrit :Au premier test, le FX-720P n'autorise pas non plus un VAL(A$(5)). Ce n'est pas juste un petit bug dans le PB-100
Ca calcul
Modérateur : Politburo
- Thierry Loiseau
- Fonctionne à 1200 bauds
- Messages : 823
- Enregistré le : 10 avr. 2004 22:23
- Localisation : Terrasson (Périgord)
- Contact :
Re: Ca calcul
HP-41C, HP-12C ; Casio FX-702P, FX-850P, FX-602P, FX-3900P, FX-4000P, FX-180Pv ;
TI 57 avec adaptation d'une pile LR9 et une originale, accus HS; Newton MP 120FR, MP 2100US, MP 130US...
[***Apple //e, 7100, 8500, Atari Mega ST1 ***], PB-540c, PISMO, [***CPC-6128, MO5***]... et bien d'autres trucs
[--- plus ---]
http://astrophoto.free.fr/
TI 57 avec adaptation d'une pile LR9 et une originale, accus HS; Newton MP 120FR, MP 2100US, MP 130US...
[***Apple //e, 7100, 8500, Atari Mega ST1 ***], PB-540c, PISMO, [***CPC-6128, MO5***]... et bien d'autres trucs
[--- plus ---]
http://astrophoto.free.fr/
Re: Ca calcul
Je viens d'essayer sur un Sharp PC-1246, il n'y a pas le "souci"
- charognard
- Fonctionne à 9600 bauds
- Messages : 4412
- Enregistré le : 06 juin 2007 19:28
- Localisation : Indre et loire
- Contact :
Re: Ca calcul
Normal .... c'est un SHARP !
-
- Fonctionne à 75 bauds
- Messages : 28
- Enregistré le : 14 avr. 2017 14:45
- Localisation : Paris
Re: Ca calcul
Mon Casio PB-700 accepte un VAL (A $(5))
Re: Ca calcul
Salut Ben, moi j'ai un
gros problème avec les chaines
sur PC-1212...
...
Y'a que LEN non ?
...
ste
gros problème avec les chaines
sur PC-1212...
...
Y'a que LEN non ?
...
ste
Re: Ca calcul
Je n'ai pas encore de 1212, mais sur le 1211, il n'y a pas de traitement de chaînes de caractères, pas de LEN, STR$, VAL, MID$, ...
- charognard
- Fonctionne à 9600 bauds
- Messages : 4412
- Enregistré le : 06 juin 2007 19:28
- Localisation : Indre et loire
- Contact :
Re: Ca calcul
c'est clair que le traitement des chaines sur PC 1212 est inexistant.
mais c'était le premier ordinateur de poche
mais c'était le premier ordinateur de poche
- Thierry Loiseau
- Fonctionne à 1200 bauds
- Messages : 823
- Enregistré le : 10 avr. 2004 22:23
- Localisation : Terrasson (Périgord)
- Contact :
Re: Ca calcul
D'après le dernier numéro des Pocketicaires (disponible bientôt immédiatement dès 2107), j'ai hésité entre ce type de machine à programmer et une HP-41C... Ben, je ne regrette pas trop
HP-41C, HP-12C ; Casio FX-702P, FX-850P, FX-602P, FX-3900P, FX-4000P, FX-180Pv ;
TI 57 avec adaptation d'une pile LR9 et une originale, accus HS; Newton MP 120FR, MP 2100US, MP 130US...
[***Apple //e, 7100, 8500, Atari Mega ST1 ***], PB-540c, PISMO, [***CPC-6128, MO5***]... et bien d'autres trucs
[--- plus ---]
http://astrophoto.free.fr/
TI 57 avec adaptation d'une pile LR9 et une originale, accus HS; Newton MP 120FR, MP 2100US, MP 130US...
[***Apple //e, 7100, 8500, Atari Mega ST1 ***], PB-540c, PISMO, [***CPC-6128, MO5***]... et bien d'autres trucs
[--- plus ---]
http://astrophoto.free.fr/
Re: Ca calcul
Et qu'as-tu choisi? J'ai les deux machines (bientôt le 1212 aussi), je trouve qu'elles sont complémentairesThierry Loiseau a écrit :D'après le dernier numéro des Pocketicaires (disponible bientôt immédiatement dès 2107), j'ai hésité entre ce type de machine à programmer et une HP-41C... Ben, je ne regrette pas trop
- Thierry Loiseau
- Fonctionne à 1200 bauds
- Messages : 823
- Enregistré le : 10 avr. 2004 22:23
- Localisation : Terrasson (Périgord)
- Contact :
Re: Ca calcul
À lire dans la gazette
https://youtu.be/EV9mHPHRG7k
https://youtu.be/EV9mHPHRG7k
HP-41C, HP-12C ; Casio FX-702P, FX-850P, FX-602P, FX-3900P, FX-4000P, FX-180Pv ;
TI 57 avec adaptation d'une pile LR9 et une originale, accus HS; Newton MP 120FR, MP 2100US, MP 130US...
[***Apple //e, 7100, 8500, Atari Mega ST1 ***], PB-540c, PISMO, [***CPC-6128, MO5***]... et bien d'autres trucs
[--- plus ---]
http://astrophoto.free.fr/
TI 57 avec adaptation d'une pile LR9 et une originale, accus HS; Newton MP 120FR, MP 2100US, MP 130US...
[***Apple //e, 7100, 8500, Atari Mega ST1 ***], PB-540c, PISMO, [***CPC-6128, MO5***]... et bien d'autres trucs
[--- plus ---]
http://astrophoto.free.fr/
Re: Ca calcul
Merci les gus, pas de traitement
du tout..., ste
du tout..., ste
- C.Ret
- Fonctionne à 9600 bauds
- Messages : 3419
- Enregistré le : 31 mai 2008 23:43
- Localisation : N 49°22 E 6°10
Re: Ca calcul
Si, si, quand même, sur SHARP PC121x on peut comparer deux chaines de caractères ! Ou les utiliser pour aller à un label à l'aide de GOTO o GOSUB
Sinon, pour effectuer la multiplication sur deux entiers gigantesques, on peut utiliser un programme qui les décompose en deux tableaux d'entier plus petits que 100000 afin d'éviter les erreur d'arrondi ou de dépassement.
Utilisation :
RUN[ENTER] (ou [DEF][SPC] ) commence une nouvelle multiplication.
Au prompt "A _", on entre les chiffres de l'entier gigantesque A par groupe d'au maximum 10 chiffres. Chaque groupe entré vient s'ajouter à la droite des groupes précèdent afin de former l'entier final.
Une pression sans saisie sur [ENTER] valide le premier entier.
Le prompt "B _" permet de saisir de la même manière le second facteur gigantesque.
Un pression sur [ENTER] valide alors le second facteur et effectue la multiplication.
Le Pocket affiche de temps en temps un compte-à-rebours -5 CALC afin de faire patienter.
Puis imprime les deux facteurs A: et B: puis leur produit.
[DEF][ A ] et [DEF][ B ] permettent de reprendre la saisie des deux facteurs gigantesques A et B depuis le début.
[DEF][ = ] effectue la multiplication et imprime le résultat
Exemple:
Pour multiplier 479001600 par 1307674368000, effectuer les opérations suivantes:
Il faut bien évidemment "ajouter" les zéro à gauche de chaque groupe de 5 chiffres. La mise ne forme est quasi impossible avec ce Pocket.
MEM renvois 863 STEPS et 107 MEMORIES.
Le code fait donc environ 561octets et 122 registres sont disponibles pour mémoriser les deux facteurs et le résultat.
On peut donc espérer faire les multiplications de nombres ayant plus de 152 chiffres et dont le produit fait au plus 305 chiffres.
Sinon, pour effectuer la multiplication sur deux entiers gigantesques, on peut utiliser un programme qui les décompose en deux tableaux d'entier plus petits que 100000 afin d'éviter les erreur d'arrondi ou de dépassement.
Code : Tout sélectionner
1 " " CLEAR : E=Exp-5,A=11:USING "######"
2 "A" B=12,K=0
3 F=2:GOSUB 10:INPUT "A ";H:GOSUB 20:GOTO 3
4 "B" C=1+B:A(C)=0
5 F=3:GOSUB 10:INPUT "B ";H:GOSUB 20:GOTO 5
6 "=" D=2C-A,H=0:FOR G=C TO D-1:F=H:PAUSE G-D,"CALC": FOR I=A TO B-1:FOR J=B TO C-1
7 IF I+J-G=A+B-C LET F=F+A(I)*A(J):IF FEE>1 STOP
8 NEXT J:NEXT I:H=INT EF,A(G)=F-H/E:NEXT G
9 "P" F=0:PRINT "A:":GOSUB 30:PRINT "B:":GOSUB 30:PRINT "A*B:":GOSUB 30: END
10 J=A(F)-1,I=J-1,G=A(F-1),H=1+G:IF J-G>4 PAUSE A(J);" <#> ";A(H);A(G):RETURN
11 PAUSE A(J);A(I);A(H);A(G):RETURN
20 G=10,H=INT ABS H:IF H LET G=G*10^INT LOG H:IF GEE>1 BEEP 1:RETURN
21 FOR I=A(F-1) TO A(F)-1:A(I)=H+GA(I),H=INT EA(I),A(I)=A(I)-H/E: NEXT I
22 IF H LET G=H,H=INT GE,A(A(F))=G-H/E,A(F)=1+A(F):GOTO 22
23 RETURN
30 F=F+1,G=0:FOR I=A(F+1)-1 TO A(F) STEP -1:IF G+A(I) PRINT A(I):IF A(I) LET G=1
31 NEXT I:RETURN
RUN[ENTER] (ou [DEF][SPC] ) commence une nouvelle multiplication.
Au prompt "A _", on entre les chiffres de l'entier gigantesque A par groupe d'au maximum 10 chiffres. Chaque groupe entré vient s'ajouter à la droite des groupes précèdent afin de former l'entier final.
Une pression sans saisie sur [ENTER] valide le premier entier.
Le prompt "B _" permet de saisir de la même manière le second facteur gigantesque.
Un pression sur [ENTER] valide alors le second facteur et effectue la multiplication.
Le Pocket affiche de temps en temps un compte-à-rebours -5 CALC afin de faire patienter.
Puis imprime les deux facteurs A: et B: puis leur produit.
[DEF][ A ] et [DEF][ B ] permettent de reprendre la saisie des deux facteurs gigantesques A et B depuis le début.
[DEF][ = ] effectue la multiplication et imprime le résultat
Exemple:
Pour multiplier 479001600 par 1307674368000, effectuer les opérations suivantes:
Code : Tout sélectionner
Affichage Prompt Saisies Commentaires
> > RUN[ENTER]
0 0 0 0 A _ 479001600[ENTER] Le facteur A: peut être saisi en une seule fois, il nefait que 9 chiffres.
0 0 4790 1600 A _ [ENTER]
0 4790 0 0 B _ 13076[ENTER] La saisie du facteur B: est ici effectuée en deux parties
13076 4790 0 13076 B _ 74368000[ENTER] 13076 et 74368000 d'autres coupures sont possibles ATTENTION: ne pas créer de groupe de chiffre commençant par un zéro !!
130 76743 76743 68000 B _ [ENTER]
-5CALC
-4CALC
-3CALC Compte à rebours lors du calcul
-2CALC
-1CALC Impression du calcul; sans imprimante presser sur [ENTER] pour passer à l'affichage de la ligen suivante.
A:
4790
1600 Affiche le facteur A: 4790 01600.
B:
130
76743
68000 Affiche le facteur B: 130 76743 68000.
A*B:
6
26378
11455
9888
0 Affiche le résultat A*B: 6 26378 11455 09888 00000.
>
MEM renvois 863 STEPS et 107 MEMORIES.
Le code fait donc environ 561octets et 122 registres sont disponibles pour mémoriser les deux facteurs et le résultat.
On peut donc espérer faire les multiplications de nombres ayant plus de 152 chiffres et dont le produit fait au plus 305 chiffres.
Modifié en dernier par C.Ret le 25 avr. 2017 23:51, modifié 4 fois.
SHARP PC-1211 PC-1360 EL-5150 PC-E500 | Commodore C=128D | Texas Instruments Ti-57LCD Ti-74BASICalc Ti-92II Ti-58c Ti-95PROCalc Ti-30XPROMathPrint | Hewlett-Packard HP-28S HP-41C HP-15C HP-Prime HP-71B | CASIO fx-602p | NUMWORKS | Graphoplex Rietz Neperlog | PockEmul | Sommaire des M.P.O. | Ma...dov'il sapone.
Re: Ca calcul
Je ne m'étais pas encore vraiment penché sur le sujet avec le PC-1211, mais je ne voyais pas non plus d'autres moyens que d'encoder les grands nombres déjà décomposés dans un tableau.
Merci pour ta version
Merci pour ta version
Re: Ca calcul
Avec le temps, il faut te mettre aussi au SharpThierry Loiseau a écrit :À lire dans la gazette
https://youtu.be/EV9mHPHRG7k