Page 1 sur 1
[R] Algèbre ?
Posté : lun. 14 sept. 2009 22:24
par Affen
Bonjour à tous!,
Alors voilà, je post ici pour me renseigner et savoir si vous pouviez faire un scrypt .au3
pouvant résoudre les équations algébrique du genre: "(a²(B³xa³))³=B³xB³xa²".
Merci d'avance en attendant une réponse.
Re: [..] Algèbre ?
Posté : dim. 20 sept. 2009 14:18
par L4crymal
Lol... c'est déjà compliquer en vrai, alors après si il faut le faire en prog :p
Re: [..] Algèbre ?
Posté : lun. 21 sept. 2009 17:53
par OmegAMRS
Re: [..] Algèbre ?
Posté : mar. 22 sept. 2009 13:15
par Yogui
idem je ne suis plus certain d'y arriver à la main
alors le programmer :s trop de paramètre et trop de règle à prendre en compte
Re: [..] Algèbre ?
Posté : mar. 22 sept. 2009 13:40
par Affen
Yogui a écrit :idem je ne suis plus certain d'y arriver à la main
alors le programmer :s trop de paramètre et trop de règle à prendre en compte
C'est ce que je mettais dis aussi^^. même un pro aurais de la difficulté.
Merci de vos réponses, vous pouvez fermer le topic
Re: [..] Algèbre ?
Posté : mar. 22 sept. 2009 13:47
par jbnh
En soi, si tu connais toi la technique, il y a aucun problème. Il suffit seulement de faire des +, -, * et / (des opérations quoi).
Cherche la méthode de résolution, le code doit etre très simple.
Néanmoins, Je ferme le topic a ta demande.
Re: [R] Algèbre ?
Posté : jeu. 24 sept. 2009 14:42
par 20100
Je n'ai pas très bien compris l'ecriture de ton équation (a²(B³xa³))³=B³xB³xa², de la manière dont je l'ai compris elle est équivalente à ((a*a*a*a*a)*(B*B*B)*x)³ = B*B*B*x*B*B*B*x*a*a et donc très simple à résoudre, en tout les cas voila un exemple pour la résolution de cette équation.
;(E) <=> (a²(B³xa³))³=B³xB³xa²
; 1) Si a=0 alors tout B réel et tout x réel sont solutions de (E)
; 2) Si B=0 alors tout a réel et tout x réel sont solutions de (E)
; 3) Si a!=0 et B!=0
; (E) <=> (a²(B³xa³))³=B³xB³xa²
; (E) <=> ((a*a*a*a*a)*(B*B*B)*x)³ = B*B*B*x*B*B*B*x*a*a
; (E) <=> expo(a,15) * expo(B,9) * expo(x,3) = expo(B,6) * expo(a,2) * expo(x,2)
; (E) <=> expo(a,13) * expo(B,3) * expo(x,3) - expo(x,2) = 0
; (E) <=> expo(x,2) * [ (expo(a,13) * expo(B,3))*x - 1] = 0
; Alors x = 0 ou bien x = 1 / (expo(a,13) * expo(B,3))
Code : Tout sélectionner
Func _expo($x, $puissance)
Local $result = $x
Select
Case $puissance = 0
$result = 1
Case $puissance > 1
For $i=1 To $puissance-1 Step 1
$result = $result * $x
Next
Case $puissance < 0
$result = 1/_expo($x, -$puissance)
EndSelect
Return $result
EndFunc
Func _resolve($a, $B)
ConsoleWrite("--------------------------------------------------------------------"&@CRLF)
ConsoleWrite("Resoudre l'équation (E) <=> (a²(B³xa³))³=B³xB³xa² avec a="&$a&" et B="&$B&@CRLF)
Select
Case $a=0
ConsoleWrite("Comme a=0 alors tout B réel et tout x réel sont solutions de (E)"&@CRLF)
Case $B=0
ConsoleWrite("Comme B=0 alors tout a réel et tout x réel sont solutions de (E)"&@CRLF)
Case ($a<>0 AND $B<>0)
ConsoleWrite("x = 0 et x = "&1 / (_expo($a,13) * _expo($B,3))&" sont solutions de (E)"&@CRLF)
EndSelect
EndFunc
_resolve(1, 2)
