1. Информатика
  2. Вмассиве из 15 элементов заданого

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

Appolinaria1330 Appolinaria1330    3   02.10.2019 05:01    0

Ответы
prapra2017oz2bo2 prapra2017oz2bo2  09.10.2020 11:03
PascalABC.NET 3.4.2, сборка 1881 от 19.11.2018Внимание! Если программа не работает, обновите версию!

begin

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

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

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
zaharovivan150 zaharovivan150  28.04.2021 12:42
Program Example_180; Uses crt; Var m,n,k:word; {n – початкова кількість скринь з золотом, m – щорічний “прибуток” Чахлика Невмирущого, k – “потреби” Василини Премудрої} Sum,Years:word;...
milenakag2008 milenakag2008  17.04.2020 12:30
Привет всем с информатикой с тестом: пример как нужно сделать: дано: A=10 B=18 подставим данные IF 10 18 THEN S:= A ELSE S:=B; (если 10 18 то S= 10 иначе S=18) WRITE (S); ответ...
zhjdjq2005 zhjdjq2005  07.04.2020 21:28
вставить правильно слова❤️...
mail000alomer mail000alomer  07.04.2020 21:28
Склади усну розповідь на тему «Моя кімната», вико-ристовуючи іменники: кімната, двері, вікно, стеля, стіни,коридор, шафа, стіл, стілець, тумбочка, ліжко, підлога. Незабувай...
Viviccompany Viviccompany  07.04.2020 21:28
Найди точку графика линейной функции y=6x−2, абсцисса которой равна ординате....
DorzayS DorzayS  07.04.2020 21:28
В трапеции ABCD основание BC=7см основание AD=14. Диагонали трапеции пересекаются в точке O причем OC=3см. Найдите AC...
Arsen00628 Arsen00628  07.04.2020 21:28
У якому році на території Гетьманщини російський уряд запровадив мідні гроші?А) 1720 р.B) 1708 р.Б) 1721 р.Г) 1709 р.​...
5Все5ники5заняты5 5Все5ники5заняты5  07.04.2020 21:28
Постройте на бумаге, очень вас, прямоугольную четырехугольную призму и четырехуголную пирамиду надеюсь, кто-нибудь если найдется вдруг время......
dxkuznecov dxkuznecov  07.04.2020 21:28
Найдите сумму всех двузначных чисел, делящихся на 5....
danil2001334 danil2001334  07.04.2020 21:28
Фонетичний розбір слів : парубок , Цюрих ​...

Популярные вопросы