Strings werden wohl nur zufällig genommen
im Prinzip ist ein Zeichen/Char auch nur ein ordinaler Typ und man könnte stattdessen auch jeden anderen ordinalen Typen nehmen
Delphi-Quellcode:
while ... do
case zustand of
z0: case wert of
w1: ...;
w2: ...;
...
end;
z1: case wert of
w1: ...;
w2: ...;
...
end;
z2: case wert of
w1: ...;
w2: ...;
...
end;
....
end;