Konsolenanwendung - Wie lasse ich einen Vorgang wiederholen und runde Ergebnisse?

[Jumpy]

Gibts dafür nicht auch writeln (also write+Zeilenumbruch?).
Wenn du dir noch mal meine Variante anschaust, siehst du, dass ich die J/N - Frage nur 1x Stellen will, wegen DRY. Vielleicht änderst du deine Variante dahingehend auch mal ab?

Zur Prüfung. Kenn jetzt Lazarus nicht so, aber in Delphi gibt es so Funktionen ala "TryStrToInt", such mal nach sowas.

Erstauint mich gerade eh, das das bei dir funzt:
a, b, c, x, x1, x2, Diskriminante:real;
readln(a);