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

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