Программа вычисления суммы частей в одномерном массиве

// Пример программки на языке Паскаль.

var
   i, sum, n : integer;           // объявляем переменные целочисленного типа.
   arr : array of integer;       // объявляем массив.
Begin
   writeln(Введите размерность массива:);       // вывод строчки на экран.
   read(n);                                                       // считываем размерность массива.
   setlength(arr,n);                                          // выделяем память под массив.
     for i:= 0 to (n-1) do                                 // начало цикла.
      begin
       arr[i] := random(-100, 100); // наполняем элемент массива числом из спектра -100; 100.
       sum := sum + arr[i]; // считаем сумму частей массива.
      end;
   writeln(Сумма элементов в массиве равна: , sum);       // вывод строчки на экран.
End.