Решение во вложении
..............................
Составил в pascal
program mas;
var i,j:integer; a:array [1..10] of integer;
begin
randomize;
for i=1 to 10 do
begin
a[i]:=random(10);
end;
for i=2 to 10 do
begin
j:=j+a[i];
i:=i+1;
end;
writeln(j);
readln;
end.
1 клумба=76
2 клумба=44
3 клумба=16
4 клумба=46
76+44+16+46=182 (м)- провода нуж но.
Ответ:182