11 lines
292 B
Text
11 lines
292 B
Text
#include <basico.h>
|
|
|
|
algoritmo
|
|
|
|
v={},n=19
|
|
'0,1,2,3,4,5,6,7,8,9,"\t","\v","\v","A","B","C","D","E","F"' enlistar en 'v'
|
|
|
|
imprimir ("Original:\n[",v,"]\n\n")
|
|
imprimir (rareti( n, #(ceil(rand(n))), n, intercambiar en (v)),\
|
|
"Processed:\n[", v,"]\n" )
|
|
terminar
|