Misez p'tit, Optimisez - Le retour

Ici, on fait dans le petit, le LCD qui déchire sa race, on y cause même calculatrices quand on est en manque !

Modérateur : Politburo

Répondre
Avatar du membre
Hobiecat
Fonctionne à 9600 bauds
Fonctionne à 9600 bauds
Messages : 3637
Enregistré le : 06 sept. 2011 14:57
Localisation : Normandie

Misez p'tit, Optimisez - Le retour

Message par Hobiecat »

Et voilà le retour de Misez p'tit, optimisez !

Pour se remettre en jambes, on va partir d'un truc de base :
- on suppose que x est une valeur à l'affichage
- calculer 3x^3 + 4x^2 + x + 9 en le moins de pas possible

Les règles :
- uniquement des progs sur calculatrice ou pocket
- précisez bien quelle machine vous utilisez (comme vu dans le fil devinette RPN de Charo, les vieilles HP et les nouvelles HP en RPL ne réagissent pas pareil !)

Good luck !


Je commence avec la méthode "bourrin" pour servir de référence haute :
Sur 15C :

Code : Tout sélectionner

STO 00
3
y^x
3
*
RCL 00
x^2
4
*
+
RCL 00
+
9
+
Théoriquement, ça ne sera pas dur de faire mieux ! :wink:
Avatar du membre
Hobiecat
Fonctionne à 9600 bauds
Fonctionne à 9600 bauds
Messages : 3637
Enregistré le : 06 sept. 2011 14:57
Localisation : Normandie

Re: Misez p'tit, Optimisez - Le retour

Message par Hobiecat »

En relisant, pocket ou pas pocket... suivant les cas comme ci-dessus, ça va être un peu "basic" :D

Sur PB-100

Code : Tout sélectionner

10 INPUT X : PRINT 3*X^3+4*X^2+X+9
Pas grand chose à retirer il me semble....
Avatar du membre
pir2
Fonctionne à 9600 bauds
Fonctionne à 9600 bauds
Messages : 4647
Enregistré le : 31 oct. 2006 15:08
Localisation : 67310 Westhoffen
Contact :

Re: Misez p'tit, Optimisez - Le retour

Message par pir2 »

De tête, sans vérifier, sur HP-41, que sur la pile

Code : Tout sélectionner

ENTER
*
LASTX
*
LASTX
ENTER
*
LASTX
9
+
x<>Y
4
*
+
X<>Y
3
*
+
ou

Code : Tout sélectionner

STO Y
STO*Y
STO*Y
STO Z
STO*Z
9
+
X<>Y
3
*
+
X<>Y
4
*
+
Image
Image
pascal_meheut
Fonctionne à 1200 bauds
Fonctionne à 1200 bauds
Messages : 307
Enregistré le : 25 sept. 2008 06:40

Re: Misez p'tit, Optimisez - Le retour

Message par pascal_meheut »

Une autre version sur 15c :

Enter
Enter
3
*
4
+
*
1
+
*
9
+

Ca va plus vite.
Pas mal de HP de la 55 à la 48, 97.... Casio 702p, 890P, AI-1000 et PB-2000C, WP34s dont j'écris les émulateurs et la version iOS
Je cherche les modules Pascal et Prolog pour la PB-2000C
Avatar du membre
Hobiecat
Fonctionne à 9600 bauds
Fonctionne à 9600 bauds
Messages : 3637
Enregistré le : 06 sept. 2011 14:57
Localisation : Normandie

Re: Misez p'tit, Optimisez - Le retour

Message par Hobiecat »

Allez, je joue aussi :wink:
Sur 15c, en version "que sur la pile" :

Code : Tout sélectionner

ENTER
ENTER
ENTER
3
*
4
+
X//Y
X^2
*
+
9
+
Avatar du membre
zpalm
Fonctionne à 9600 bauds
Fonctionne à 9600 bauds
Messages : 2930
Enregistré le : 03 mai 2008 15:33
Localisation : Grenoble

Re: Misez p'tit, Optimisez - Le retour

Message par zpalm »

RPN, en 13 pas en n'utilisant que la pile:

Code : Tout sélectionner

01 ENTER
02 ENTER
03 ENTER
04 3
05 *
06 4
07 +
08 *
09 1
10 +
11 *
12 9
13 +
@pascal_meheut, il te manque un ENTER :wink:
Avatar du membre
Hobiecat
Fonctionne à 9600 bauds
Fonctionne à 9600 bauds
Messages : 3637
Enregistré le : 06 sept. 2011 14:57
Localisation : Normandie

Re: Misez p'tit, Optimisez - Le retour

Message par Hobiecat »

pascal_meheut a écrit :Une autre version sur 15c :

Enter
Enter
3
*
4
+
*
1
+
*
9
+

Ca va plus vite.
Marche pas, il manque un ENTER...

Edit : grillé par zpalm :wink:
pascal_meheut
Fonctionne à 1200 bauds
Fonctionne à 1200 bauds
Messages : 307
Enregistré le : 25 sept. 2008 06:40

Re: Misez p'tit, Optimisez - Le retour

Message par pascal_meheut »

Oui, faute de frappe, il manque un Enter au début. Sur la 15C, je l'avais mis mais elle a eu du mal à envoyer son listing en bluetooth au Mac :-)
Pas mal de HP de la 55 à la 48, 97.... Casio 702p, 890P, AI-1000 et PB-2000C, WP34s dont j'écris les émulateurs et la version iOS
Je cherche les modules Pascal et Prolog pour la PB-2000C
Avatar du membre
pir2
Fonctionne à 9600 bauds
Fonctionne à 9600 bauds
Messages : 4647
Enregistré le : 31 oct. 2006 15:08
Localisation : 67310 Westhoffen
Contact :

Re: Misez p'tit, Optimisez - Le retour

Message par pir2 »

Les deux derniers cas sont faux ...
Image
Image
Avatar du membre
Hobiecat
Fonctionne à 9600 bauds
Fonctionne à 9600 bauds
Messages : 3637
Enregistré le : 06 sept. 2011 14:57
Localisation : Normandie

Re: Misez p'tit, Optimisez - Le retour

Message par Hobiecat »

zpalm a écrit :RPN, en 13 pas en n'utilisant que la pile
Pareil... qui va faire mieux que 13 ???
Et on attend les TI !! :wink:
Avatar du membre
gege
Fonctionne à 14400 bauds
Fonctionne à 14400 bauds
Messages : 7147
Enregistré le : 31 janv. 2008 14:24
Localisation : Banlieue Paârisienne
Contact :

Re: Misez p'tit, Optimisez - Le retour

Message par gege »

Impossible (pour moi) de faire moins de 13 pas...
Allez une méthode bizarre en 13 pas :

Code : Tout sélectionner

STO 0
1
+
ENTER
3
*
2
-
*
RCL 0
*
9
-
G.E.

EDIT : manque un ENTER je pense, alors je triche, en 12 pas :

Code : Tout sélectionner

STO Y
1
+
STO Y
3
*
2
-
*
*
9
-
héhé...
Avatar du membre
charognard
Fonctionne à 9600 bauds
Fonctionne à 9600 bauds
Messages : 4412
Enregistré le : 06 juin 2007 19:28
Localisation : Indre et loire
Contact :

Re: Misez p'tit, Optimisez - Le retour

Message par charognard »

pascal_meheut a écrit :Une autre version sur 15c :

Enter
Enter
3
*
4
+
*
1
+
*
9
+

Ca va plus vite.
Il te manque un ENTER j'ai fais un post recement dessus ;)
c'est la solution officiel le HP pour traiter les polynomes page 177 du manuel avancé de la 41cx
Avatar du membre
pir2
Fonctionne à 9600 bauds
Fonctionne à 9600 bauds
Messages : 4647
Enregistré le : 31 oct. 2006 15:08
Localisation : 67310 Westhoffen
Contact :

Re: Misez p'tit, Optimisez - Le retour

Message par pir2 »

charognard a écrit :
pascal_meheut a écrit :Une autre version sur 15c :

Enter
Enter
3
*
4
+
*
1
+
*
9
+

Ca va plus vite.
Il te manque un ENTER j'ai fais un post recement dessus ;)
c'est la solution officiel le HP pour traiter les polynomes page 177 du manuel avancé de la 41cx
Je me répète, vous avez essayé? c'est pas le bon résultat !
La solution de Gége est bien meilleure
Image
Image
Avatar du membre
Hobiecat
Fonctionne à 9600 bauds
Fonctionne à 9600 bauds
Messages : 3637
Enregistré le : 06 sept. 2011 14:57
Localisation : Normandie

Re: Misez p'tit, Optimisez - Le retour

Message par Hobiecat »

En RPL, on arrive à gagner 1 pas et à faire en 12 :

Code : Tout sélectionner

DUP
DUP
3
*
4
+
SWAP
x^2
*
+
9
+
Avatar du membre
Hobiecat
Fonctionne à 9600 bauds
Fonctionne à 9600 bauds
Messages : 3637
Enregistré le : 06 sept. 2011 14:57
Localisation : Normandie

Re: Misez p'tit, Optimisez - Le retour

Message par Hobiecat »

gege a écrit :héhé...
Marche pas sur ma 41 ?
Répondre

Retourner vers « Tous les Pockets »