Hab mal kurz gegoogelt und u.a. das hier gefunden:
www.math.northwester...lutions/josephus.pdf
Also zum ersten scheint das kein Algorithmus zu sein, sondern ein Problem.
Es stehen dabei Leute im Kreis, und startend bei Person Nr.2 wird im Uhrzeigersinn jede 2te Person "rausgeschmissen", bis nur noch eine Person übrig ist, also Raus sind Person 2,4,6,....
Berechnet werden soll die Person, die am Ende übrigbleibt. Richtig?
Wie man das macht,und warum das klappt, steht in dem pdf. In Delphi sollte das so gehen:
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11:
| zweihochk:=1; repeat zweihochk:=zweihochk*2; until zweihochk*2>n; m:=n-zweihochk;
Josephus:=2*m+1; |
Edit: Was hat das eigentlich mit VCL zu tun?
We are, we were and will not be.