cs_zibong
Messages postés35Date d'inscriptionmardi 27 juillet 2004StatutMembreDernière intervention21 juillet 2008
-
21 mars 2006 à 14:08
cs_zibong
Messages postés35Date d'inscriptionmardi 27 juillet 2004StatutMembreDernière intervention21 juillet 2008
-
22 mars 2006 à 17:12
Je sais que sa a pas beaucoup a voir avec delphi mais j'ai besoins dans l'un de mes programme de ressoudre une équation du type suivant: tan(a)=(cos(a)^(-2))*K1+K2
Je cherche a et je conais K1 et K2.
tan(O)=(cos(O)^(-2))*K1+K2
tan(O)=k1/cos²O+K2
sinO/cosO=K1/cos²O+K2
cos²O*sinO/cosO=K1+K2cos²O
cosO*sinO=K1+K2cos²O
cos²O*sin²O=K1²+2K1K2cos²O+K2²(cosO)^4
cos²O*(1-cos²O)=K1²+2K1K2cos²O+K2²(cosO)^4
[1+K2²](cosO)^4+[2K1k2-1]cos²O+K1²=o
On pose y=cos²
On obtient [1+K2²]y²+[2K1k2-1]y+K1²=o
On est alors ramené à une équation du second degrée
Tu trouves les valeurs possibles de y
On a alors cosO=+racine carée de Y ou son opposé
Tu peux alors déterminer l'angle O
cs_zibong
Messages postés35Date d'inscriptionmardi 27 juillet 2004StatutMembreDernière intervention21 juillet 20081 21 mars 2006 à 16:32
K1 et K2 sont des réel que je connais
a est un angle que je cherche
Mon probleme est situer dans la résolution de cette equation: tan(a)=(cos(a)^(-2))*K1+K2
donc a=ArcTan((cos(a)^(-2))*K1+K2)
met il faudrait faire passer le a de droite a gauche, chose que je n'arrive pas a faire.
Merci d'avance pour votre aide.
Vous n’avez pas trouvé la réponse que vous recherchez ?
Bon tu peux utiliser un procéder par itération :
Tu imposes une valeur à ton angle a
Tu calculs par ta formule une autre valeur de a :
Deux cas de figures :
a est différent de la valeur imposée : tu recommences la procedure en augmentant a d'un pas par exemple 0.1
a est proche de la valeur imposée (la différence est inférieure à 0,1) : la valeur de a imposée est alors la valeur réelle de a (à la précision près de 0.1).