Flûte, démasquécharognard a écrit :79,6 kg
1,82 m
90Kg pour pir2 et 1,86m
83Kg et 1,83m pour Zpalm
elle n'est pas mal cette NSPIRE
Mieux se connaître grâce à la Casio fx-602P
Modérateur : Politburo
- pir2
- Fonctionne à 9600 bauds

- Messages : 4594
- Inscription : 31 oct. 2006 16:08
- Localisation : 67310 Westhoffen
- Contact :
Re: Mieux se connaître grâce à la Casio fx-602P
- charognard
- Fonctionne à 9600 bauds

- Messages : 4411
- Inscription : 06 juin 2007 19:28
- Localisation : Indre et loire
- Contact :
Re: Mieux se connaître grâce à la Casio fx-602P
Explication de mon programme précédent
j'ai effectué un calcul dichotomique en 3 passes (la premiere boucle FOR)
sur une gamme de masse de 50 à 120Kg (mi et ma)
avec un pas au 10eme (pa)
se qui donne un delta de 0.07 (suffisant pour la précision demandée) pour une trentaine d'itérations
et même vu que je divise par 2 l'écart à la fin (ligne 130) c'est 0.035
j'ai gagné ?
Code : Tout sélectionner
10 di = 50, mi = 50, ma = 120
20 INPUT 'FORMULE DUBOIS:",y
30 INPUT 'FORMULE BOYDE:",z
40 FOR a= 1 TO 3
50 pa = (ma - mi) / 10
60 FOR m= mi TO ma STEP pa
70 ca = 84204.79060 * 1.155225233 ^ ((LOG m) ^ 2) * (z / m ^ 0.6157) ^ (10 / 3)
80 ca=ca - 905.1824087* (y / m ^ 0.425) ^ 1.379310344
90 If Abs(ca) < Abs(di) LET m1 = m, m2 = m + pa, di = ABS(ca)
100 Next
110 mi = m1, ma = m2
120 NEXT
130 m=mi + (mi - ma) / 2
140 h=905.1824087*(y/m^0.425)^1.379310344
150 PRINT "MASSE",m,"HAUTEUR",h
sur une gamme de masse de 50 à 120Kg (mi et ma)
avec un pas au 10eme (pa)
se qui donne un delta de 0.07 (suffisant pour la précision demandée) pour une trentaine d'itérations
et même vu que je divise par 2 l'écart à la fin (ligne 130) c'est 0.035
j'ai gagné ?
Dernière édition par charognard le 31 oct. 2010 23:41, édité 1 fois.
- charognard
- Fonctionne à 9600 bauds

- Messages : 4411
- Inscription : 06 juin 2007 19:28
- Localisation : Indre et loire
- Contact :
Re: Mieux se connaître grâce à la Casio fx-602P
Sur mon pauvre 1262 ça met 64s ça reste correct
mais je sent que ça va être encore un point de départ du optimisation sauvage.
espèrons que nous subiront pas d'attaque du chevalier du zodiaque cette fois ci
mais je sent que ça va être encore un point de départ du optimisation sauvage.
espèrons que nous subiront pas d'attaque du chevalier du zodiaque cette fois ci
- charognard
- Fonctionne à 9600 bauds

- Messages : 4411
- Inscription : 06 juin 2007 19:28
- Localisation : Indre et loire
- Contact :
Re: Mieux se connaître grâce à la Casio fx-602P
Optimisation simple permettant de faire le calcul en 30s avec les valeurs 2.008 et 2.008
ajout de b=0 en 50, de b=1 en 80 et ajout de la ligne 90
en effet à quoi ça sert de calculer la méga formule lorsque l'on à trouvé la plage !
remarquez en ligne 90 une astuce permettant de sortir de la boucle proprement en changeant la valeur de m
ajout de b=0 en 50, de b=1 en 80 et ajout de la ligne 90
en effet à quoi ça sert de calculer la méga formule lorsque l'on à trouvé la plage !
remarquez en ligne 90 une astuce permettant de sortir de la boucle proprement en changeant la valeur de m
Code : Tout sélectionner
10 di = 50, mi = 50, ma = 120
20 INPUT 'FORMULE DUBOIS:",y
30 INPUT 'FORMULE BOYDE:",z
40 FOR a = 1 TO 3
50 pa = (ma - mi) / 10,b = 0
60 FOR m = mi TO ma STEP pa
70 ca = 84204.7906 * 1.155225 ^ (LOG m ^ 2) * (z / m ^ .6157) ^ (10 / 3) - 905.1824* (y / m ^ .425) ^ 1.37931
80 IF ABS ca < di LET m1 = m, m2 = m + pa, di = ABS ca, b = 1
90 IF b AND ABS ca > di LET m = ma+1
100 NEXT m
110 mi = m1, ma = m2
120 NEXT a
130 m = mi + (mi - ma) / 2
140 h=905.1824*(y/m^.425)^1.37931
150 PRINT "MASSE",m,"HAUTEUR",h
Dernière édition par charognard le 31 oct. 2010 23:41, édité 9 fois.
- charognard
- Fonctionne à 9600 bauds

- Messages : 4411
- Inscription : 06 juin 2007 19:28
- Localisation : Indre et loire
- Contact :
Re: Mieux se connaître grâce à la Casio fx-602P
Une autre optimisation possible, au vu des courbes, est de tester le signe de l'expression en partant du milieu des masses.
à la relecture de ma phrase, pas sur que quelqu'un comprenne quelque chose
mais je me comprends
[Message personnel à ma femme]
BEURRE
FARINE
PACK D'EAU
CHOCOLAT
SUCRE GLACE
PILE AAA et AA
Oubli pas le pain à la boulangerie
[/Message personnel à ma femme]
à la relecture de ma phrase, pas sur que quelqu'un comprenne quelque chose
mais je me comprends
[Message personnel à ma femme]
BEURRE
FARINE
PACK D'EAU
CHOCOLAT
SUCRE GLACE
PILE AAA et AA
Oubli pas le pain à la boulangerie
[/Message personnel à ma femme]
- C.Ret
- Fonctionne à 9600 bauds

- Messages : 2483
- Inscription : 31 mai 2008 23:43
- Localisation : N 49°22 E 6°10
Re: Mieux se connaître grâce à la Casio fx-602P
Ah! Oui, très bien vu cette solution avec une dichotomie.charognard a écrit :j'ai gagné ?
Moi j'étais d'abord parti pour un simplex de dimension 2 (c'est à dire H ert W).
Mais le problème est qu'il y a deux surfaces de réponse (Dubois et Boyde) et qu'un les rassemblant en une seule réponse (distance euclidienne, de manhattan, racine, ABS, etc style (Dubois - Boyde) ou équivalent paramétrique), on obtient une surface quasiment plane et un peu concave aux alentours des valeurs les plus fréquentes (des poids et tailles d'adulte).
Ce qui fait que le simplex (H,W) tourne en rond et s'arrête un peu bête à coté de la bonne réponse.
Donc, je suis aussi parti pour une méthode utilisant l'une des variables piur en déduire l'autre. Avec la HP-28S, c'est un jeu d'enfant en utilisant le SOLVEUR (et beaucoup de EXPAN COLECT et FORM pour simplifier les expressions).
SHARP PC-1211 + CE-121 + CE-122. | VIC 20 Commodore 128D + Printer P-803 + SD2iec. | TI-57 LCD | HP-28S + HP82240A | TI-74 BasiCalc | HP-41C + (2 memory + stat + IR) | HP-15C | HP Prime Color Touchscreen Graphing Calculator| TI-92 II | CASIO fx-602p + FA-1 | HP-71B 64K+JPC-ROM+HPIL+card reader . Sommaire des M.P.O..
- charognard
- Fonctionne à 9600 bauds

- Messages : 4411
- Inscription : 06 juin 2007 19:28
- Localisation : Indre et loire
- Contact :
Re: Mieux se connaître grâce à la Casio fx-602P
je ne t'explique même pas sur la NSPIRE


Re: Mieux se connaître grâce à la Casio fx-602P
Bonsoir à tous !
Une Chti'te version FX-602P
P0 (55 pas)
Pour moi çà donne : 2,028 m2
Faudrait que je passe sous les 2 m² lol (et comme ma taille bouge pas, que je descende à 80kg
Une Chti'te version FX-602P
P0 (55 pas)
Code : Tout sélectionner
"Taille cm?" HLT
x^y .725 x
"Poids kg?" HLT
x^y .425 x .007184 = FIX3
"-> # m2"Faudrait que je passe sous les 2 m² lol (et comme ma taille bouge pas, que je descende à 80kg
Casio FX-502P /602P / 603P / FX180P+ / FX4000P / TI57 / TI66 / TI74 Basicalc / TI95 Procalc / HP12C / HP15C LE / DM41L / HP 30B / HP39GII / HP 48SX USA / 49G / 49G+ / 50G / 50G NewRPL / HP Prime / Oric 1 / Amstrad CPC 6128+
Re: Mieux se connaître grâce à la Casio fx-602P
Pour l'énigme 2, je cherche avec la HP50 dès que je la récup de mon fils mais c'est comme la 28S je pense (fonction SOLVE)
Sur la 602, faudrait reprendre l'algo de Charognard mais pas tout compris :O
A quoi correspond la formule de calcul de CA ? a quoi sert DI ?.
L'idée "bestiale" qui me vient directement à l'esprit, c'est 2 boucles imbriquées (poids et taille) et calcul du delta des 2 formules mais je préfère même pas tester une 602
Sur la 602, faudrait reprendre l'algo de Charognard mais pas tout compris :O
A quoi correspond la formule de calcul de CA ? a quoi sert DI ?.
L'idée "bestiale" qui me vient directement à l'esprit, c'est 2 boucles imbriquées (poids et taille) et calcul du delta des 2 formules mais je préfère même pas tester une 602
Dernière édition par Gilles59 le 31 oct. 2010 22:26, édité 1 fois.
Casio FX-502P /602P / 603P / FX180P+ / FX4000P / TI57 / TI66 / TI74 Basicalc / TI95 Procalc / HP12C / HP15C LE / DM41L / HP 30B / HP39GII / HP 48SX USA / 49G / 49G+ / 50G / 50G NewRPL / HP Prime / Oric 1 / Amstrad CPC 6128+
- charognard
- Fonctionne à 9600 bauds

- Messages : 4411
- Inscription : 06 juin 2007 19:28
- Localisation : Indre et loire
- Contact :
Re: Mieux se connaître grâce à la Casio fx-602P
Alors CA c'est simplement la fonction DUBOIS - la fonction BOYDE si CA = 0 alors x est égale à la masse (kg) de la personne et y à sa taille (cm).
Pour DI (que je mets arbitrairement à 50 au départ) c'est simplement la valeur la plus proche de 0 qu'atteind CA dans la plage testée (l'écart entre les deux fonctions pour le x (masse) testé)
Pour DI (que je mets arbitrairement à 50 au départ) c'est simplement la valeur la plus proche de 0 qu'atteind CA dans la plage testée (l'écart entre les deux fonctions pour le x (masse) testé)
Re: Mieux se connaître grâce à la Casio fx-602P
Merci, c'est bien ce qu'il me semblaitcharognard a écrit :Alors CA c'est simplement la fonction DUBOIS - la fonction BOYDE si CA = 0 alors x est égale à la masse (kg) de la personne et y à sa taille (cm).
Pour DI (que je mets arbitrairement à 50 au départ) c'est simplement la valeur la plus proche de 0 qu'atteind CA dans la plage testée (l'écart entre les deux fonctions pour le x (masse) testé)
Casio FX-502P /602P / 603P / FX180P+ / FX4000P / TI57 / TI66 / TI74 Basicalc / TI95 Procalc / HP12C / HP15C LE / DM41L / HP 30B / HP39GII / HP 48SX USA / 49G / 49G+ / 50G / 50G NewRPL / HP Prime / Oric 1 / Amstrad CPC 6128+
- charognard
- Fonctionne à 9600 bauds

- Messages : 4411
- Inscription : 06 juin 2007 19:28
- Localisation : Indre et loire
- Contact :
Re: Mieux se connaître grâce à la Casio fx-602P
c'est une constante sur toutes les machines ça X^2 plus lent que X² plus lent que X.X.Gilles59 a écrit :Merci, c'est bien ce qu'il me semblaitcharognard a écrit :Alors CA c'est simplement la fonction DUBOIS - la fonction BOYDE si CA = 0 alors x est égale à la masse (kg) de la personne et y à sa taille (cm).
Pour DI (que je mets arbitrairement à 50 au départ) c'est simplement la valeur la plus proche de 0 qu'atteind CA dans la plage testée (l'écart entre les deux fonctions pour le x (masse) testé)Je fais sur la 602 par curiosité pour voir le temps de calcul :O La fonction ^ semble tres lente (alors que x² est "rapide")
Le problème ici c'est que le carré est sur un LOG et le LOG et lent aussi donc pas persuadé que LOG X * LOG X soit plus rapide que (LOG X) ^2.
Sur le SHARP pas de fonction carré que des puissance
J'ai modifié mon code un peu je suis en dessous des 30s maintenant (toujours sur 1262)
- charognard
- Fonctionne à 9600 bauds

- Messages : 4411
- Inscription : 06 juin 2007 19:28
- Localisation : Indre et loire
- Contact :
Re: Mieux se connaître grâce à la Casio fx-602P
Vu que tu calcule les 2 fonctions pour le même X (masse) je doute réellement de l'intéretGilles59 a écrit :L'idée "bestiale" qui me vient directement à l'esprit, c'est 2 boucles imbriquées (poids et taille) et calcul du delta des 2 formules mais je préfère même pas tester une 602
Re: Mieux se connaître grâce à la Casio fx-602P
Oui, çà serait bourin !charognard a écrit :Vu que tu calcule les 2 fonctions pour le même X (masse) je doute réellement de l'intéretGilles59 a écrit :L'idée "bestiale" qui me vient directement à l'esprit, c'est 2 boucles imbriquées (poids et taille) et calcul du delta des 2 formules mais je préfère même pas tester une 602
J'ai repris ton algo (v1) sur la 602P... Ca calcule assez vite (pas mesuré) mais je trouve ....
147,60 cm pour... 113,665 kg :O
Je revois çà !
Casio FX-502P /602P / 603P / FX180P+ / FX4000P / TI57 / TI66 / TI74 Basicalc / TI95 Procalc / HP12C / HP15C LE / DM41L / HP 30B / HP39GII / HP 48SX USA / 49G / 49G+ / 50G / 50G NewRPL / HP Prime / Oric 1 / Amstrad CPC 6128+
- charognard
- Fonctionne à 9600 bauds

- Messages : 4411
- Inscription : 06 juin 2007 19:28
- Localisation : Indre et loire
- Contact :
Re: Mieux se connaître grâce à la Casio fx-602P
c'est quoi tes 2 résultats (en précisant le test)





