[Malena]

Hi,

habe gerade bisschen mit Pascal rumgespielt und versuche die PQ Formel zu lösen.

Ich bekomme aber einen Fehler. Exitcode 207

Hier der Quellcode

program p_q_formel;
{ hallo / pq_form1.pas }

uses crt;

var
a, b, c, p, q, x1, x2 : real;

begin
textbackground(blue);
clrscr;
writeln; writeln; writeln;
textcolor(white);
writeln(' PROGRAMM: p-q-Formel: a x2 +bx + c = 0');
textcolor(yellow);
writeln('===============================================');
writeln;
write(' a = ');
readln(a);
write(' b = ');
readln(b);
write(' c = ');
readln(c);
p := b/a; q := c/a;
writeln; writeln(' p = ', p:0:2, '; q = ', q:0:2);

x1 := -p/2 + sqrt(sqr(p/2) - q);
x2 := -p/2 - sqrt(sqr(p/2) - q);

writeln; writeln;
writeln(' ERGEBNISSE: ');
writeln(' ----------- ');
writeln(' x1 = ', x1:0:2);
writeln(' x2 = ', x2:0:2);

writeln; writeln; writeln;
writeln(' Ende -> RETURN');
readln;


end.

Tut mir leid, wenn ich hier falsch bin, aber ich weiß nicht weiter...

[Rushh0ur]

Der Code ist syntaktisch Richtig.

Beachte jedoch, das sqrt nicht mit negativen Zahlen umgehen kann:

If X is negative, then a run-time error is generated.

Musst also noch sicherstellen das die Eingabe des Benutzers keine komplexen Nullstellen hat.

Mfg Rushh0ur

[test@private.co]

Musst also noch sicherstellen das die Eingabe des Benutzers keine komplexen Nullstellen hat.

Genauer gesagt nur Reelle. Da z.B. 5 + 0i ist sowohl Komplex als auch Reell ist (Eigentlich sind die Komplexen Zahlen nur ne "Erweiterung" der Reellen, bzw sind die Reellen ne (echte) Teilmenge der Komplexen).

Wird wohl für den Thread-Ersteller nicht von belang sein, aber vielleicht interessierts ja wen