С помощью датчика случайный чисел на интервале от 25 до 100 получить целочисленный массив состоящий из 27 элементов ( пожалуйста срочно )

Program n1;var a: array[1..27] of integer;i: integer;beginrandomize;for i:=1 to 27 do a[i]:=random(76)+25; end.