Hallo!
Ich versuch grad ein Programm zu schreiben, welches mir eine quadratische Gleichung mithilfe der Mitternachtsformel
-b +- Wurzel(b²-4ac)
-----------------------
2a
aufslöst.
[autoit]
$a = InputBox("Eingabe", "Bitte gib a ein:")
$b = InputBox("Eingabe", "Bitte gib b ein:")
$c = InputBox("Eingabe", "Bitte gib c ein:")
$b = $b*(-1) ;Der Parameter b wird der Gleichung angepasst (-b)
[/autoit][autoit][/autoit][autoit]; { Radikant }
$disk1 = $b*$b ;b²
$disk2 = -4*$a*$c ;-4ac
$disk3 = $disk1 + $disk2 ;b²-4ac
$wurzel = Sqrt($disk3) ;Wurzel(b²-4ac)
If $wurzel < "0" Then MsgBox(64, "Lösung", "L={]")
MsgBox(64, "Ausgabe", $wurzel)
Irgendwie klappt das mit der Wurzel nicht. Da bekomm ich immer "-1.#IND" raus. Wo liegt der Fehler?
fabs