Программа заполняет случайнами числами от 0 до 9 массив из 7 элементов. Запишите вместо знака ? недостающий код.

Примечание: не забывайте в конце строки поставить знак ;

Program random;

var a: array[1..7] of integer;
i:integer;
begin
randomize;
for i:=1 to 7 do
begin
?
write(a[i],' ');
end;
end.