С подмогою генератора случайных чисел на промежутке (0,100) получите целочисленный массив,

var
   arr : array [1..25] of integer; // объявляем массив.
   i : integer;                           // объявляем переменную целочисленного типа.
Begin
   for i:= 1 to 25 do                 // начало цикла.
     begin
         arr[i] := random(0, 100); // заполняем элемент массива с индексом i случайным числом.
         write(arr[i], );              // вывод содержимого массива на экран.
     end;
End.