Page 1 sur 1
calcule d'angle avec cos
Publié : dim. 04/sept./2005 9:37
par scaraber
salut
je n'arive pas a calculer un angle avec cos enfin sa ne marche pas ....
Code : Tout sélectionner
If tri (1,2)= 1 And tri (1,3)= 1
AddGadgetItem(#Listview_0, position, "calcul de l'angle ACB") :position=position+1
AddGadgetItem(#Listview_0, position, "") :position=position+1
AddGadgetItem(#Listview_0, position, "ABC est un triangle rectangle en A") :position=position+1
AddGadgetItem(#Listview_0, position, "donc cos C=AC/BC ") :position=position+1
CA$=tria(1,3)
BC$=tria(1,2)
AB$=tria(1,1)
AddGadgetItem(#Listview_0, position, "cos C = "+CA$+" / "+ BC$) :position=position+1
CA.f=ValF(tria(1,3))
BC.f=ValF(tria(1,2))
AB.f=ValF(tria(1,1))
C.f=CA.f/BC.f
AddGadgetItem(#Listview_0, position, "cos C= " + StrF(C.f)):position=position+1
AddGadgetItem(#Listview_0, position, "C = " + StrF(ACos(CA.f/BC.f))):position=position+1
EndIf
Publié : dim. 04/sept./2005 10:59
par scaraber
j'ai trouver
en faite luniter donner est en radian il sufi de convertir les ardian en degre
C1.f=(C*180)/#PI
a++
Publié : dim. 04/sept./2005 10:59
par bombseb
hello petit scarabée !
n'oublie jamais cette phrase
SOH CAH TOA (prononcer "soche cache toi")
Sinus = coté opposé / hypotenuse
Cos = coté adjacent / hypotenuse
Tan = coté opposé / coté adjacent
une fois que tu à le cos de ton angle il ne te reste plus qu'a faire un acos (arccosinus) pour avoir la valeur de ton angle.
Attention en purebasic les fonctions arc* ramène une valeur en RADIANS
donc il faut convertir ta valeur si tu la veut en degrés...je te laisse chercher la formule qui n'est pas compliquée à retrouver
@+
Publié : dim. 04/sept./2005 11:00
par scaraber
on a du poster en meme temps lol ergarde plus hautre
PS: la phrase je la conait
Publié : dim. 04/sept./2005 11:09
par bombseb
ah oui 10h59 tout les deux
on à fait fort là
Publié : dim. 04/sept./2005 13:01
par scaraber
au secours je me perd
Code : Tout sélectionner
If tri (1,3)= 1 And tri (1,6)= 1
;on ecrit la redaction
AddGadgetItem(#Listview_0, position, "calcul de BC") :position=position+1
AddGadgetItem(#Listview_0, position, "") :position=position+1
AddGadgetItem(#Listview_0, position, "ABC est un triangle rectangle en A") :position=position+1
AddGadgetItem(#Listview_0, position, "donc cos C=AC/BC") :position=position+1
;on reupere les varaible
C$=tria(1,6)
B$=tria(1,5)
CA$=tria(1,3)
BC$=tria(1,2)
AB$=tria(1,1)
;on remplace
AddGadgetItem(#Listview_0, position, "cos" + C$+ " = " + CA$+"/ BC") :position=position+1
AddGadgetItem(#Listview_0, position, "BC= cos"+C$+"/"+CA$):position=position+1
;on transphorme les bvariable
C.f=ValF(tria(1,6))
B.f=ValF(tria(1,5))
CA.f=ValF(tria(1,3))
BC.f=ValF(tria(1,2))
AB.f=ValF(tria(1,1))
;on calcule le cos qui est doner en radian
C.f=Cos(C.f)
;on transphoirme en degré
C.f=(C*180)/#PI
,on fait l'opperation
BC.f=C.f/AC.f
;on ecrit el resultat finla
AddGadgetItem(#Listview_0, position, "BC="+Str(BC$)) :position=position+1
AddGadgetItem(#Listview_0, position, "") :position=position+1
EndIf
sa marceh pas
Publié : dim. 04/sept./2005 13:55
par Dr. Dri
scaraber a écrit :au secours je me perd
fallait acheter un GPS
plus sérieusement, expose ton problème parce que là on ne peut pas comprendre pour toi... si tu ne nous dis pas ce que tu essayes de faire on aura pas envie de deviner en regardant ton code... et le code tel que tu le mets en forme ne donne pas non plus envie de regarder...
Dri
Publié : dim. 04/sept./2005 13:57
par Morsula
Il y a même des fautes d'orthographe dans les commentaires...
Publié : dim. 04/sept./2005 14:26
par scaraber
c bon sa marche jai reussi a trouver apre s2 h a essayer divers chose