В массиве из 15 элементов заданого с клавиатуры посчитать сумму элементов больших 0 и...

Question

В массиве из 15 элементов заданого с клавиатуры посчитать сумму элементов больших 0 и меньше 15

Comments

Язык?

Answer 1

PascalABC.NET 3.4.2, сборка 1881 от 19.11.2018

Внимание! Если программа не работает, обновите версию!

begin

 ReadSeqInteger('Вводите:', 15)

     .Where(t -> t.InRange(1, 14)).Sum.Println

end.