Fehlermeldung:Inkompatible Typen:'Integer'und'Extended' ????

[Zipp]

Zitat von Hans33:

Das Problem ist nur folgendes: Ich muss auch durch Null teilen

Delphi-Quellcode:

for x := 1 to 270 do
    begin
         y:=m/(x+(270-(2*x)));
         Paintbox1.Canvas.Pixels[x,y]:=clBlue;
    end;

Mit div statt / kommt: Dividieren durch Null nicht möglich

Wenn man

x+(270-(2*x))

umformt, dann erhält man

270-x

Da die Schleife bis 270 geht ist klar, dass beim letzten Durchlauf x=270 ist und damit der Nenner 0 wird.