100 prisoners: Difference between revisions
m
→{{header|XPL0}}
(Added XPL0 example.) |
|||
Line 6,530:
int I, J, T;
[for I:= 100-1 downto 1 do
[J:= Ran(I+1); \range [0..I
T:= Drawer(I); Drawer(I):= Drawer(J); Drawer(J):= T;
];
| |||