La recherche a retourné 22 résultats

par currybleu
05 mars 2013 13:00
Forum : Tous les Pockets
Sujet : [HP28] [HP48] [HP49] [HP50] Quelles quenottes !
Réponses : 37
Vues : 3674

Re: [HP28] [HP48] [HP49] [HP50] Quelles quenottes !

Que de bons souvenirs ce #11CAh SYSEVAL. Pour ceux qui veulent un peu gratter cette fonction cachée de la 28S, j'ai toute une panoplie de programmes qui utilisent cette fonction dont la première est celle qui permet de donner l'heure: << #11CAh SYSEVAL >> 'TICK' STO 8191.86513813 'TOP' STO << #11CAh...
par currybleu
21 févr. 2013 14:44
Forum : Tous les Pockets
Sujet : Misez p'tit, Optimisez - N°38 (comptez les 1 2 3 4 5)
Réponses : 51
Vues : 3000

Re: Misez p'tit, Optimisez - N°38 (comptez les 1 2 3 4 5)

A mon avis la taille mémoire occupée par la pile n'a pas a être prise en compte dans le calcul de la taille d'un programme.seul le programme et autres objets (listes, sous programmes, matrices, etc...) utilisés par le programme doit être comptabilisé. Par exemple, si je fais un programme du style <<...
par currybleu
21 févr. 2013 13:28
Forum : Tous les Pockets
Sujet : Misez p'tit, Optimisez - N°38 (comptez les 1 2 3 4 5)
Réponses : 51
Vues : 3000

Re: Misez p'tit, Optimisez - N°38 (comptez les 1 2 3 4 5)

Par contre je ne sais pas trop comment compter les variables utilisées dans un programme en RPL, car les variables peuvent contenir n'importe quel objet qui peut avoir n'importe quelle taille. Pareil pour l'utilisation de la pile, les objets présents sur la pile peuvent être de différentes nature. ...
par currybleu
18 févr. 2013 21:35
Forum : Tous les Pockets
Sujet : Misez p'tit, Optimisez - N°38 (comptez les 1 2 3 4 5)
Réponses : 51
Vues : 3000

Re: Misez p'tit, Optimisez - N°38 (comptez les 1 2 3 4 5)

Bon alors je n'ai pas compris l’énoncé car pour moi, une des solution pour chaque matrice peut etre:

[1 2 3 4 5 6 7 8 9]
[1 1 1 1 1 1 1 1 1]

[1 2 3 4 5 6 ]
[1 1 1 1 1 1 ]

[1 2 3 4 5]
[1 1 1 1 1]

[1 2 3 4]
[1 1 1 1]
par currybleu
18 févr. 2013 20:43
Forum : Tous les Pockets
Sujet : Misez p'tit, Optimisez - N°38 (comptez les 1 2 3 4 5)
Réponses : 51
Vues : 3000

Re: Misez p'tit, Optimisez - N°38 (comptez les 1 2 3 4 5)

Hello, Il semble que ton ennoncé prêt à interpretation. est-ce que le programme doit trouver une solution? répondre par vrai ou faux? solution ou pas de solution), indiquer toutes les solutions, et sous quel format? Le plus simple serait que tu prennes un exemple avec par exemple N=7 et que tu affic...
par currybleu
16 févr. 2013 14:39
Forum : Tous les Pockets
Sujet : Misez P'tit, Optimisez - N°37 (Distance entre 2 points GPS)
Réponses : 9
Vues : 1326

Re: Misez P'tit, Optimisez - N°37 (Distance entre 2 points G

Petite astuce à propos des unités
Les COS et SIN doivent être fait en degrés alors que la fonction ACOS doit être utilisée en Radians :D
(Mettre en mode radian avant de calculer ACOS)
par currybleu
15 févr. 2013 16:33
Forum : Tous les Pockets
Sujet : Misez P'tit, Optimisez - N°37 (Distance entre 2 points GPS)
Réponses : 9
Vues : 1326

Misez P'tit, Optimisez - N°37 (Distance entre 2 points GPS)

Bonjour Si vous le voulez-bien, un petit exercice sympa.. un peu la suite du MPO n°35 :lol: - Google Earth donne les coordonnées du sommet du Mont-Blanc: Lat1: N4?.832891° Long1 E?.865074° (unités décimales) - La formule pour calculer la distance entre 2 points est la suivante: Distance=ACOS(SIN(RAD...
par currybleu
15 févr. 2013 12:04
Forum : Tous les Pockets
Sujet : Misez p'tit, Optimisez - N°12
Réponses : 32
Vues : 5464

Re: Misez p'tit, Optimisez - N°12

LOL.. bien vue cette fonction que je ne connaissais pas mais je ne suis pas certain qu'elle soit autorisée dans cet exercice..
Pirate! :pirat:
par currybleu
15 févr. 2013 10:41
Forum : Tous les Pockets
Sujet : Misez p'tit, Optimisez - N°12
Réponses : 32
Vues : 5464

Re: Misez p'tit, Optimisez - N°12

Hello, Désolé de déterrer ce Thread aussi ancien, mais j'ai pas pu m’empêcher de faire ce petit programme pour ma HP. Ci-joint donc le prog RPL pour HP28S/48/49/50 « DUP IP SWAP FP 100 * DUP IP SWAP FP 100 * SWAP ROT IF OVER 3 < THEN DUP 1 - ELSE DUP 2 - SWAP END DUP 4 / IP OVER 100 / IP - SWAP 400 ...
par currybleu
15 févr. 2013 10:21
Forum : Tous les Pockets
Sujet : [HP28S] Trouver la fraction de n'importe quel nombre...
Réponses : 12
Vues : 833

Re: [HP28S] Trouver la fraction de n'importe quel nombre...

0.423892100192+0.255298651253i ->Q donne :'(377815125178001928503+227547745846008946169*i)/891300227123938488689' en FIX5 '(440+265*i)/1038' par contre, il n'y a pas de commande native pour les racines la fonction ->Q m'a l'air intéressante à utiliser. il doit donc être possible d'optimiser mon pro...
par currybleu
14 févr. 2013 23:16
Forum : Tous les Pockets
Sujet : [HP28S] Trouver la fraction de n'importe quel nombre...
Réponses : 12
Vues : 833

Re: [HP28S] Trouver la fraction de n'importe quel nombre...

Ca remonte à loin, mais dès que t'as un pattern qui se répète, tu le divises par le même "nombre de 9" que la longueur du pattern, non ? Genre 0, 235678 235678 235678 = 235678 / 999999. 22/7 = 3, 142857 142857 etc, on s'occupe pas du 3, et ça donne 142857 / 999999. en fait mon algo ne fonctionne pa...
par currybleu
14 févr. 2013 15:00
Forum : Présentation
Sujet : Présentation: Utilisateur de HP28S et HP50G
Réponses : 21
Vues : 1636

Re: Présentation: Utilisateur de HP28S et HP50G

BIENVENUE :D J'ai commencé par une hp-35 en 1973, puis ont suivi une 15c, 28s, 48sx et 35s (que je n'ai jamais employée). Depuis lors, j'ai commencé à les collectionner et j'en suis actuellement à ma 59e C'est vraiment cool de voir que je ne suis pas le seul amateur nostalgique des HP! et quand je ...
par currybleu
14 févr. 2013 10:05
Forum : Tous les Pockets
Sujet : enigme ti 57
Réponses : 20
Vues : 1643

Re: enigme ti 57

.... des énigmes qui font tourner la tête :-)
par currybleu
14 févr. 2013 09:40
Forum : Tous les Pockets
Sujet : [HP28S] Trouver la fraction de n'importe quel nombre...
Réponses : 12
Vues : 833

Re: [HP28S] Trouver la fraction de n'importe quel nombre...

Je suis en train de tester les programmes sur HP50G. Pour l'instant je suis sur REDUC. qui est compatible. ci-dessous le code pour la HP50G (j'imagine qu'il est également compatible avec les modèles 48 et 49? à confirmer: %%HP: T(3)A(R)F(.); \<< DUP \->NUM 1.E12 * 1.E12 \-> o n m \<< n ABS m DO SWAP...

Aller sur la recherche avancée