2 5 + 7 5 * - .


: swap_in_array
    rot swap over swap cells + -rot swap cells + 2dup @ swap @ rot ! swap !
;


arr_size 0 +do
    array rand abs arr_size mod i swap_in_array
loop


포스최고 아 ㅋㅋ