ЗАДАЧИ НА ОДНОМЕРНЫЙ МАССИВ!

[jeysun]

Помогите решить сложно сделать.

Задано два массива A(n) и B(n). Сформировать массив C(n), значения элементов которого вычисляются по формуле Ci=Ai+Bi. Массив C вывести на экран.

Задан массив А(15). Элементы с нечетными индексами заменить их квадратами. Измененный массив вывести на экран

[Mad_Cat]

1

for i:=1 to n do
c[i]:=a[i]+b[i];

2

for i:=1 o 15 do
 if odd(i) then a[i]:=a[i]*a[i];