Sorting algorithms/Bogosort: Difference between revisions

m
(→‎Insitux: correction)
Line 3,553:
=={{header|Yabasic}}==
{{trans|FreeBASIC}}
<syntaxhighlight lang="yabasic">dim a(5)
a (0) = 10: a (1) = 1: a (2) = 2: a (3) = -6: a (4) = 3
 
Bogosort(a())
 
for i = 0 to arraysize(a(),1) - 1
print a(i), " ";
next i
end
 
sub shuffle(a())
n = arraysize(a(),1)
Line 3,571 ⟶ 3,580:
for i = 0 to n-2
if a(i) > a(i+1) then return false : fi
next i
return true
Line 3,580 ⟶ 3,589:
shuffle(a())
wend
end sub</syntaxhighlight>
 
dim a(5)
a (0) = 10: a (1) = 1: a (2) = 2: a (3) = -6: a (4) = 3
 
Bogosort(a())
 
for i = 0 to arraysize(a(),1) - 1
print a(i), " ";
next i
end
</syntaxhighlight>
 
 
=={{header|zkl}}==
2,122

edits