838 résultats trouvés

par tyann
11 févr. 2024 17:10
Forum : Tous les Pockets
Sujet : Mes boîtes - Partie 4 - Hewlett-Packard
Réponses : 22
Vues : 1102

Re: Mes boîtes - Partie 4 - Hewlett-Packard

Oui les calculatrices en boites c'est quand même beaucoup
mieux que sous blister.
D'ailleurs je crois que cette année les nouveaux modèles ressortent en boite.
par tyann
11 févr. 2024 17:07
Forum : Tous les Pockets
Sujet : Fonction'sign'
Réponses : 14
Vues : 686

Re: Fonction'sign'

Salut Charo

Effectivement qu' un PC 1500A renvoie une valeur <> pour un test qu'un 1500
c'est assez consternant.
Pour ce qui est des complexes, la Prime et les 68K renvoient pareil que la 50G
Ouf !
par tyann
11 févr. 2024 08:45
Forum : Tous les Pockets
Sujet : Fonction'sign'
Réponses : 14
Vues : 686

Re: Fonction'sign'

A noter pour les TI 68k (89,92 etc...)
Le +-1 qu'elles renvoient pour SIGN(0) est une expression (getType)
ainsi si vous additionnez cette valeur à une variable vous obtenez des choses bizarres
SIGN(0)+1 renvoie +-1+1
Si vous faîtes SING(0) sto a, puis SIGN(0)+a sto a alors a=undef.
Enfin un test IF sur cette expression +-1 renverra une erreur --> test ne peut être résolu.
Pour ma part j'utilise sur ces machines :

Code : Tout sélectionner

when(val=0,0,sign(val))
par tyann
11 févr. 2024 07:52
Forum : Tous les Pockets
Sujet : Fonction'sign'
Réponses : 14
Vues : 686

Re: Fonction'sign'

Bonjour
En tout cas, cette année est depuis aujourd'hui sous le signe du Dragon ! :D
Et ça c'est positif ou négatif ? :)
J'ai testé les Hp 28,35 et 48, SGN 0 renvoie 0 également.
La Prime aussi et sa fonction SIGN fonctionne également avec les complexes.
par tyann
10 févr. 2024 17:54
Forum : Tous les Pockets
Sujet : Fonction'sign'
Réponses : 14
Vues : 686

Re: Fonction'sign'

Bonsoir

J'ai fait un petit sondage au prés de mes machines :
Les Pockets basic sont tous d'accord SGN 0 =0.
Je n'ai trouvé aucune de mes calculatrices Casio qui possède cette fonction, ni aucune Sharp d'ailleurs.
Plus étonnant OPL ne connaît pas non plus cette fonction.
Il ne me reste plus qu'à vérifier les Hp.
par tyann
10 févr. 2024 10:22
Forum : Tous les Pockets
Sujet : Fonction'sign'
Réponses : 14
Vues : 686

Re: Fonction'sign'

Salut C.Ret

Oui moi aussi je pensais que la 41 était la seule exception, pour la TI 95
il ne s'agit pas d'un bug car cela est explicitement décrit dans le mode d'emploi.
A noter que le TI 74 pourtant sorti en même temps que la 95 renvoie bel et bien 0.
par tyann
10 févr. 2024 08:49
Forum : Tous les Pockets
Sujet : Fonction'sign'
Réponses : 14
Vues : 686

Fonction'sign'

Bonjour

Il y a quelques temps j'ai utilisé la fonction 'SIGN' ou 'SGN' selon les machines
dans un MPO et je me suis rendu compte que toutes les machines n'étaient pas
d'accord sur la valeur à renvoyer pour 0.
Même au sein d'une même marque : TI par exemple

Sur ma TI 66 (je pense qu'il en est de même pour les 58/59) SIGN de 0
renvoie 0 (OP 10).
Sur la TI 95, elle renvoie 1 et sur les TI graphiques (85 et 86), elle renvoie bien 0
sur les autres modèles (80 à 84) elle est absente.
Enfin le pompon revient aux TI 89,92, V200 et nSpire qui elles renvoient +-1 :lol:
Pas très cohérent tout ça, il me semble .
par tyann
08 févr. 2024 12:30
Forum : Tous les Pockets
Sujet : Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?
Réponses : 74
Vues : 33810

Re: Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?

Hé bien si, il y en a au moins un qui accepte la ligne 0,
c'est ce cher Canon X-07, mais malheureusement il ne
dispose pas de la fonction FRAC.
Le TI 74 refuse également la ligne 0.
par tyann
08 févr. 2024 07:06
Forum : Tous les Pockets
Sujet : Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?
Réponses : 74
Vues : 33810

Re: Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?

Bonjour
@ C.Ret Excellent code pour la Ti 95, félicitations.
J'ai pensé un instant pouvoir encore optimiser ma version 702P, je me suis
dit que si on pouvait commencer la numérotation des lignes à 0, j'économisais
le 1+ sur le GOTO, mais non le petit Casio à poliment refusé et les Sharp n'acceptent
pas d'avantage.
Je me demande si il existe un Basic qui accepte la ligne n°0 et sinon pourquoi ?
par tyann
06 févr. 2024 20:02
Forum : Tous les Pockets
Sujet : Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?
Réponses : 74
Vues : 33810

Re: Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?

Bonsoir

Voici une nouvelle (ultime ?) version optimisée dans laquelle j'ai
réussi à supprimer une ligne soit un gain de 2 octets.

Code : Tout sélectionner

 1 PRT B:VAC :INP A
 2 A=INT A/2:B=B+SGN FRAC A:GOTO 1+SGN A
On affiche B au premier lancement, puis après on peut enchaîner les calculs
avec CONT.
33 Octets pour cette version.
@Schraf : Oui c'est un petit plus rapide.
par tyann
06 févr. 2024 12:02
Forum : Tous les Pockets
Sujet : Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?
Réponses : 74
Vues : 33810

Re: Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?

Bonjour Schraf

Oui effectivement c'est PRT B et non A.
Remplacer 'SGN' par '2*' ça fait un octet en plus non.
par tyann
05 févr. 2024 22:36
Forum : Tous les Pockets
Sujet : Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?
Réponses : 74
Vues : 33810

Re: Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?

Bonsoir C.Ret
Tu peux retirer le INT dans le test, ça fait un octet de moins et juste une boucle de plus qui ne change pas le résultat.
Ah oui exact, mais j'ai encore mieux 'si j'enléve le test carrément'.

Code : Tout sélectionner

1 VAC:INPUT A
2 A=INT A/2:B=B+SGN FRAC A:GOTO 3-SGN A
3 PRT B
35 Octets.

Edit : correction PRT A par PRT B
par tyann
05 févr. 2024 20:33
Forum : Tous les Pockets
Sujet : Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?
Réponses : 74
Vues : 33810

Re: Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?

Bonsoir

Je propose une version pour fx-702p avec une piste qui n'a pas été explorée :
Utiliser la fonction 'SIGNE' sur la partie fractionnaire de la division pour incrémenter le compteur de 1.

Code : Tout sélectionner

10 VAC :INP A
12 IF A>0;A=A/2:B=B+SGN FRAC A:A=INT A:GOTO 12
14 PRT B
42 octets, sur le petit Casio le test IF A ne passe pas --> ERREUR 5
Je voulais faire ça sur ma Ti 95 mais à ma grande surprise celle ci répond 1
à SGN 0 comme la Hp 41.

Version optimisée 38 octets

Code : Tout sélectionner

1 VAC :INP A
2 IF INT A>0;A=INT A/2:B=B+SGN FRAC A:GOTO 2
2 PRT B
par tyann
20 janv. 2024 20:11
Forum : Général
Sujet : L'annonce la plus drôle
Réponses : 4300
Vues : 1667206

Re: L'annonce la plus drôle

par tyann
19 janv. 2024 14:43
Forum : Frimer - brag - dernières acquisitions
Sujet : Nouvelle acquisition: une Seiko
Réponses : 16
Vues : 836

Re: Nouvelle acquisition: une Seiko

Bonjour
Superbe cette UC 3000.
Pour l’UC 2000, une montre programmable ça c’est de la balle.
Cela existe t-il encore de nos jours ?

Aller à la recherche avancée