Forum: Sonstige Fragen zu Delphi
Delphi
by peterpan1,
31. Mai 2007
p:=StrToFloat(PEdit.Text);
q:=StrToFloat(QEdit.Text);
if ((p/2)*(p/2)-q)<0 then
begin
LEdit.Text:='Keine Lösung';
L1Edit.Text:='';
L2Edit.Text:='';
end
Forum: Sonstige Fragen zu Delphi
Delphi
by peterpan1,
31. Mai 2007
Ok, das v habe ich entfernt.
Es kommen trotzdem falsche Ergebnisse.
Forum: Sonstige Fragen zu Delphi
Delphi
by peterpan1,
31. Mai 2007
Was ist denn hier los ?
q:=StrToFloat(QEdit.Text);
Schon direkt bei der "2." Zeile zeigt er mir einen Fehler:
Forum: Sonstige Fragen zu Delphi
Delphi
by peterpan1,
31. Mai 2007
Hallo,
Ich bin neu hier im Forum und habe direkt ein Problem.
Wir haben in Info als Hausaufgabe auf, ein Programm zur Lösung quadratischer Gleichungen zu programmieren.
Mein Programm:
...