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

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