создать массив из 5 элементов,заполнить его случайными числами от -3 до 8 и вывести элементы на экран.

var a,b,c:integer;d:array [1..5] of integer;beginrandomize;for a:=1 to 5 do begind[a]:=random(-3,8);writeln('элемент массива ==> ',d[a]);end;end.