нааишите программу которая в последовательности естественных чисел определяет суммк

Нааишите программу которая в последовательности естественных чисел определяет суммк положительных чисел помогите быстрей

Задать свой вопрос
Пундык Лариса
Программка получает на вход количество чисел в последовательности а потом сами числа
Яблочникова Валя
Помоги ьыстрей
1 ответ
// PascalABC.NET 3.2, сборка 1439 от 09.05.2017
// Внимание! Если программа не работает, обновите версию!

begin
  Writeln('S=',ReadSeqInteger('-gt;',ReadInteger('n=')).Where(x-gt;xgt;0).Sum)
end.

Пример
n= 10
-gt; 15 -20 0 18 34 -11 -7 14 11 18
S=110
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт