Анализ алгоритмов обработки последовательности(Turbo Pascal)

[Dina 85]

Помогите пожалуйста написать программу. Вроди бы не сложная, связана с последовательностями, но не могу понять как оформить.
Условие на изобр.

[Stilet]

А исходные данные?

[Serge_Bliznykov]

for j:=1 to n do
  z[j] := sqr(a[j]+b[j]);