Программа заполняет случайнами числами от 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.
Вместо знака ? вставить это:
a[i] := random(0,9);