Registriert seit: 28. Apr 2008
Ort: Stolberg (Rhl)
6.659 Beiträge
FreePascal / Lazarus
|
AW: ungültiger Gleitkommawert?
28. Dez 2012, 00:17
Delphi-Quellcode:
private
kk1, kk2, kk3, kk4, kk5, kk6, kk7, kk8, kk9, kks, ka1, ka2, ka3 : real;
kkdurchschnitt : real;
kadurchschnitt : real;
notendurchschnitt : real;
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;
var
Form3: TForm3;
kk1, kk2, kk3, kk4, kk5, kk6, kk7, kk8, kk9, kks, ka1, ka2, ka3 : real;
kkdurchschnitt : real;
kadurchschnitt : real;
notendurchschnitt : real;
implementation
procedure TForm3.Button2Click(Sender: TObject);
var
kk1, kk2, kk3, kk4, kk5, kk6, kk7, kk8, kk9, kks, ka1, ka2, ka3, kas : real;
kkdurchschnitt : real;
kadurchschnitt : real;
notendurchschnitt : real;
Ich sehe eigentlich keinen Grund warum Du die Variablen dreimal definiert hast.
Ebenso solltest Du statt real double oder single benutzen.
Gruß
K-H
Programme gehorchen nicht Deinen Absichten sondern Deinen Anweisungen
R.E.D retired error detector
|