15 lines
178 B
Text
15 lines
178 B
Text
mata
|
|
function shuffle(a) {
|
|
n = length(a)
|
|
r = runiformint(1,1,1,1..n)
|
|
for (i=n; i>=2; i--) {
|
|
j = r[i]
|
|
x = a[i]
|
|
a[i] = a[j]
|
|
a[j] = x
|
|
}
|
|
return(a)
|
|
}
|
|
|
|
shuffle(1..10)
|
|
end
|