Knuth shuffle: Difference between revisions
Content added Content deleted
(Knuth shuffle in Yabasic) |
m (→{{header|QB64}}: syntax hi-lighting, sub-headered) |
||
Line 1,197: | Line 1,197: | ||
330 END DEF</lang> |
330 END DEF</lang> |
||
=={{header|QB64}}== |
==={{header|QB64}}=== |
||
⚫ | |||
⚫ | |||
⚫ | |||
and between cells at least 10% ... Shuffle from Russia |
and between cells at least 10% ... Shuffle from Russia |
||
⚫ | |||
a = 100: DIM d(a): x=0: k=0: t$=CHR$(9): RANDOMIZE TIMER 'Shuffle_RUS.bas |
a = 100: DIM d(a): x=0: k=0: t$=CHR$(9): RANDOMIZE TIMER 'Shuffle_RUS.bas |
||
PRINT ,: FOR i = 1 TO a: d(i)=i: NEXT |
PRINT ,: FOR i = 1 TO a: d(i)=i: NEXT |