• 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 -> t > 0).Sum)

    end.

    Пример2 5 1 0 -1 3Сумма положительных значений равна 11
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years