Anonymous user
Sorting algorithms/Sleep sort: Difference between revisions
→{{header|Sidef}}
Line 1,505:
6
11</pre>
=={{header|Simula}}==
<lang simula>SIMULATION
BEGIN
PROCESS CLASS SORTITEM(N); INTEGER N;
BEGIN
HOLD(N);
OUTINT(N, 3);
END;
INTEGER I;
FOR I := 3, 2, 4, 7, 3, 6, 9, 1 DO
BEGIN
REF(SORTITEM) SI;
SI :- NEW SORTITEM(I);
ACTIVATE SI;
END;
HOLD(100000);
OUTIMAGE;
END;</lang>
{{out}}
<pre> 1 2 3 3 4 6 7 9
</pre>
=={{header|SNUSP}}==
| |||