Разработчику о работе с 1С:Предприятие, Pascal, Паскаль

Сумма элементов массива, паскаль.

program SumNumArr;

  //сумма элементов массива паскаль
const
  N = 10;
var
  i_ArNm: array[1..N] of integer;
  i, i_Sum: integer;
begin
  Writeln('Введите числа массива');
  for i := 1 to N do
  begin
    ReadLn(i_ArNm[i]);
    i_Sum := i_Sum + i_ArNm[i];
  end;
  WriteLn('Сумма: ', i_Sum);
  //завершение работы программы
  WriteLn('Нажмите <Enter>, чтобы выйти.');
  ReadLn();
end.

Результат:

Сумма элементов массива, паскаль.