Регистрация
Войти
Стать экспертом Правила
Информатика

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

ОТВЕТЫ
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.
748
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам