Регистрация
эмка89
19.08.2022 22:02
Информатика
Есть ответ 👍

Дана последовательность чисел, найти сумму отрицательных элементов ( в pascal )

287
328
Посмотреть ответы 2

Ответы на вопрос:

egorjanov2200
egorjanov2200
4,5(50 оценок)
Pascalabc.net 3.4.2, сборка 1881 от 19.11.2018 внимание! если программа не работает, обновите версию!

begin

  readseqinteger('вводите: ', readinteger('n='))

      .where(t -> t < 0).sum.println

end.

пример n= 7 вводите: 13 -27 52 0 5 -10 -42 -79
GelyaNikitina87
GelyaNikitina87
4,4(57 оценок)
Логин и пароль отак

Популярно: Информатика