Дан массив a из n действительных чисел .

[Ghyt]

Дан массив a из n действительных чисел . Заполнить массив B не используя указатели , элементы которого имеют вид {|A0|,|A0+A1|,...,|A0+A1+...+An-1| }.
Помогите написать программу с комментариями пожалуйста.

[newerow1989]

const n=15;//количество действительных чисел
var a,b:array[0..n-1] of integer;//два одинаковых массива
    i,j{для циклов},sum{сумма чисел под модулем}:integer;
begin
   Randomize;//сгенерировать случайные числа
   For i:=0 to n-1 do
   begin
      a[i]:=-10+Random(20);//задаем случайные числа в диапазоне [-10; 20)
      Write(a[i],'  ');//распечатываем массив a
   end;
   Writeln('');//то же самое, что и клавиша Enter
   For i:=0 to n-1 do
   begin
      sum:=0;//обнуляем счетчик
      For j:=0 to i do//цикл от 0 до текущего номера i (A0+A1+...+An-1)
         sum:=sum+a[j];//считаем сумму элементов с 0 до i
      sum:=Abs(sum);//модуль числа sum
      b[i]:=sum;//присваиваем в элемент массива b
      Write(b[i],'  ');//распечатываем массив b
   end;
   Readln;//отобразить все на экран (зависит от среды программирования, например, у меня Delphi 6 в консольном режиме; без Readln программа сразу закроется)
end.

Сойдет?

[Ghyt]

нужно на C++

[Arigato]

Переведи сам.

[newerow1989]

Я знаю только Паскаль. Я не знаю C++

[Arigato]

Есть повод научиться.