Seminar/DKS

Wiki-Quelltext dieser Seite.

<language>Pascal</language>
<b>Quadratische Lösungsformel</b>

Entwickle ein Programm, dass bei der Vorgabe von <math>p</math> und <math>q</math> für eine quadratische Gleichung der Form <math>x^2 + px + q = 0</math> die Lösungen berechnet und ausgibt.

Beachte, dass es auch genau eine oder keine Lösung geben kann.

<i>Tipp:</i>
Verwende die Lösungsformel <math>x_{1,2} = - \frac{p}{2} \pm \sqrt{(\frac{p}{2})^2 - q}</math>. Bestimmt zunächst die Diskriminante <math>D</math>.

<code id="4f200de2dfe59">
var
  p, q : float;
  D : float;
  x1, x2 : float;
</code>

<run id="4f200bfc77a43">
p := 1.0;
q := 2.0;
</run>