Как в программе осуществить заполнение массива случайными числами?

for i := 1 to n do a[i] := random(k), где n - число элементов массива, k - диапазон генерации случайных чисел