Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Shuffle number array
program Test; var number : integer; arr1 : array[0..20] of integer; index_num : integer; index_num2 : integer; temp : integer; begin randomize(); temp := 0; for number := 1 to 9 do arr1[number] := number; for number := 0 to 100 do begin index_num := random(9) + 1; index_num2 := random(9) + 1; temp := arr1[index_num]; arr1[index_num] := arr1[index_num2]; arr1[index_num2] := temp; end; for number := 1 to 9 do begin write(arr1[number]); write(' '); end; end.
run
|
edit
|
history
|
help
0
Lunohod-1
test10
practica 7 ejercicio 1
nombre_completo
practica 9 ejercicio 11
Obrni listu
zadacha9
program z1
Бассейн-7
Calculatrice 1.0