Составить программу в которой происходит заполнение массива А, состоящего из 8 элементов, случайным образом, значения которого меняются в диапазоне от 0 до 99. Вывести этот массив А на экран с комментариями.

var a:array[1..8] of integer;

i: integer;

begin

for i:=1 to 8 do

begin

a[i]:=random(100);

writeln (i,' элемент: ',a[i])

end

end.