Заполнение массива случайным числом. Pascal.

[badname47]

Доброго времени суток.
Нужно написать программу - Заполнение массива случайным числом.

[Mad_Cat]

for i:=1 to n do
Mas[i]:=random(100);

[badname47]

Сообщение от Mad_Cat

for i:=1 to n do
Mas[i]:=random(100);

Можно полный текст программы ? Столкнулся с проблемой.

[Anton_kl]

const
n=10; {Здесь можно вместо 10 указать любой размер массива}
var i: integer;
begin
randomize;
for i:=1 to n do writeln(random(100));
end.

[badname47]

Сообщение от Anton_kl

const
n=10; {Здесь можно вместо 10 указать любой размер массива}
var i: integer;
begin
randomize;
for i:=1 to n do writeln(random(100));
end.

Спасибо большое.
Решено.