Sorting algorithms/Sleep sort: Difference between revisions

Content added Content deleted
Line 1,505: Line 1,505:
6
6
11</pre>
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}}==
=={{header|SNUSP}}==