Reduzierte Listen

Funktion zu Berechnung von Josephus Zahlen.

rechner

Das Josephus Problem de.wikipedia.org/wiki/Josephus-Problem beschreibt eine Vorschrift für Streichlisten. In einer zyklischen Liste wird umlaufend jedes zweite Element entfernt. Abhängig von der Größe der Liste liefert die Funktion das letzte Element. Der Code für den HP-16C Taschenrechner: :

 001    43.22.  A       Lbl A
 002    44      0       STO 0   
 003            2       2
 004    44      1       STO 1
 005    43.22.  1       Lbl 1
 006    45      0       RCL 0
 007    45      1       RCL 1
 008            10      ./.
 009    43      40      x=0
 010    22      2       GTO 2
 011    45      1       RCL1
 012            2       2
 013            20      x
 014    44      1       STO 1
 015    22      1       GTO 1
 016    43.22.  2       Lbl 2
 017    45      1       RCL 1
 018            2       2
 019            10      ./.
 020    44      1       STO 1
 021    45      0       RCL 0
 022            34      x<>y
 023    42      9       RMD
 024            2       2
 025            20      x
 026            1       1
 027            40      +
 028    43      21      RTN
abgelegt unter:
.
.
.