Question

Вычислите сумму данных N натуральных чисел. Входные данные Вводится число N, а затем N чисел, сумму которых необходимо вычислить. Выходные данные Выведите единственное число - сумму введенных чисел. Примеры Входные данные 3 9 5 1 Выходные данные 15 необходимо вычислить сумму входящих чисел.

Answer 1

Var
  n, i, num, sum: integer;

begin
  readln(n);
  for i := 1 to n do
  begin
    readln(num);
    sum := sum + num
  end;
  writeln(sum);
end.