delphi probleme....pq

[wuschi]

also eigtl sollte ja das programm wenn die wurzel negativ ist nach then aufhören da das andere ja nur bedingungen sind falls die wurzel positiv ist

Delphi-Quellcode:

if
      sqrt(p*p/4-q) < 0
      then
        keine.Visible := True
      else
      begin