HELPP!!!В массиве А[1..6] отыскать сумму положительных частей массива, которые находятся в

HELPP!!!
В массиве А[1..6] найти сумму положительных частей массива, которые находятся в спектре от -1 до 5 включительно.

Задать свой вопрос
1 ответ

PascalABC.NET 3.4.2, сборка 1884 от 24.11.2018

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

begin

 var a := ArrRandom(6, -1, 5);

 a.Println;

 Writeln('Сумма положительных значений равна ',

     a.Where(t -gt; t gt; 0).Sum)

end.

Пример

2 5 1 0 -1 3

Сумма положительных значений равна 11

, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт