помогите с програмированием

Составить программу в паскале:
Составить программу для вычисления вектора z={z1,z2,...z10}, равного сумме двух векторов x={x1,x2,...x10} и y={y1,y2...y10} по формуле zi=xi+yi, i=1,2,...10.вектор задан след. образом x= {0,1;0,2;0,3;0,8;1,6;-4,2;-0,4;0,5;0,8;5,3}.элементы вектора y расчитываются по формуле yi=0,7sin(0,5i)+1,3cos(i+1). Использовать оператор while