Работа с массивами случайных чисел в Pascal