Написание процедуры, сложения векторов Опции

[Jaxx]

Данные:

Код

Const n=100;
Type
   vector=array[1..n] of real;
Var
   a,b,c,d:vector;

Задача:
Опишите процедуру sum(x,y,z), которая присваивает вектору z сумму векторов x и y, и используйте ее для вычисления d=a+b+c.
Что-то я не слишком понимаю задание. В процедуре надобно писать так (на мой взгляд):

Код

z[1]:=x[1]+y[1];
z[2]:=x[2]+y[2];
......
z[n]:=x[n]+y[n];

Ну присвоили вектору сумму, а при чем тут вычисление с его помощью d=a+b+c?