Re: Lösen quadratischer Gleichungen (2) - Beispiel

[Jens-Peer Kuska <kuska@XXXXXXX.de>]

Hallo,

> Habe die Datei angehängt. Hier schließt sich noch eine Frage an, die ich
> vergessen habe: Kann man mit Solve[] auch nach Termen 

nein.

>(wie im o.g. Bsp.)
> auflösen oder muß man nach einer einzelnen Variable auflösen?

Ja.

Man kann aber auch

Solve[Eliminate[{deineGleichung, a1-a2==q},a2],q]

schreiben.

Ansonsten kommt

{{q -> ((-2 + n)*(-8 - 4*a1*(-1 + n)^2 + 
       (-2 + n)*n*(-12 + 5*n)) + (-4 + (8 - 3*n)*n)*
      Sqrt[-8 + 4*a1*(4 + a1)*(-1 + n)^2 + 
        n*(40 + n*(-56 + n*(24 + n)))])/
    (4*(-1 + n)^2*n)}, 
 {q -> ((-2 + n)*(-8 - 4*a1*(-1 + n)^2 + 
      (-2 + n)*n*(-12 + 5*n) + (-2 + 3*n)*
       Sqrt[-8 + 4*a1*(4 + a1)*(-1 + n)^2 + 
         n*(40 + n*(-56 + n*(24 + n)))]))/
    (4*(-1 + n)^2*n)}}

raus. a1 l"asst sich nicht beseitigen.

Gruss
  Jens