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

Напишите программу пожалуйста
Ввести одномерный массив A из 11 элементов. Определить в нём
сумму элементов, значения которых лежат вне диапазона [−1; 5].

ОТВЕТЫ
// PascalABC.NET 3.2, сборка 1353 от 27.11.2016
// Внимание! Если программа не работает, обновите версию!

begin
  var b:=ReadArrInteger(-gt;,11);
  Writeln(S=,b.Where(x-gt;(xlt;-1) or (xgt;5)).Sum)
end.
124
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам