Создать массив из 10 элементов. Заполнить его случайными числами от 0 до 9. Посчитать...

Question

Создать массив из 10 элементов. Заполнить его случайными числами от 0 до 9. Посчитать сумму элементов.
Спасибо!

Answer 1

Var  
a :array [1..10] of integer;
i :integer;
begin
randomize;
for i:=1 to 10 do
a[i]:= random(9);
end.