Meinst Du
Delphi-Quellcode:
temp_data[a] := h mod 2;
temp_wert := h div 2;
Das ist natürlich auch Unsinn, ich wollte schreiben
Delphi-Quellcode:
temp_data[a] := h mod 2;
h := h div 2;
Ich verwende für lokale Hilfsvariable normalerweise sehr kurze Namen, temp_wert war mir da zu lang.
Das kann keine
Exception auslösen, ist ein Algorithmus aus dem Schulbuch
Temp_data[x] kann nur 0 oder 1 werden, dass passt ziemlich bequem in ein Byte - sollte wohl auch als array of byte deklariert werden, oder überhaupt als array of boolean, damit es klar ist, ebenso wie die Daten im Feld eigentlich vom Typ boolean und nicht byte sein sollten.
Dann würde aus dem Code oben:
Delphi-Quellcode:
temp_data[a] := odd(h);
h := h div 2;
und das feld zum Zeichnen wird
y: array [boolean] of integer = (5,25);