Zitat:
1, 2, 3, 4, 5, 6, 7, 8, 9
Das wären zum Beispiel 4 Bereiche.
Und nun habe ich eine Zahl zwischen 1 und 9 und möchte gucken, in welchen Bereich diese liegt.
Ich gehe mal von diesen Angaben aus.
Delphi-Quellcode:
const
Bereich: array[1..9] of Byte = (0,0,1,2,2,2,2,3,3);
begin
assert(Zahl in [1...9], 'Zahl muß zwischen 1 bis 9 liegen');
BereichIndex := Bereich[Zahl];
end;
in der Variablen BereichIndex findest du den Index des Bereiches
0 = 1,2
1 = 3
2 = 4,5,6,7
3 = 8,9
Gruß Hagen