Gleichung umformen

[Bjoerk]

Ok. Vielen Dank. Man macht das wohl noch anders.. Weiß jemand wie diese Formel für p^2 zu benutzen ist, falls b > a?

// Edit

Also das mein ich:

Delphi-Quellcode:

    Eps :=  Sqrt(A * A - B * B) / A;
    ACos := Cos(DegToRad(Phi));
    ASin := Sin(DegToRad(Phi));
    P := Sqrt(B * B / (1 - Eps * Eps * ACos * ACos));
    X := X1 + P * ACos;
    Y := Y1 + P * ASin;