Язык какой нужен? Напишу на паскале...
for i:=1 to N // крайний элемент массива
do
begin
a[i]:=a[i]*2;
end;
