a) Du musst die Variablen initialisieren
b) Für welche Zahl x soll denn bitte sqrt(x) kleiner als Null sein? Willst du vielleicht testen, ob das Argument kleiner als Null ist, bevor du die Wurzel ziehst?
// Ach ja: 'Delphi Problem' ist in einem Delphi Forum nicht wirklch hilfreich
Erwarte das Beste und bereite dich auf das Schlimmste vor.