Информатика,паскаль,написать программу: сформировать массив, состоящий из n целых элементов, лежащих в промежутке [10; 10] вычислить: -минимальный по модулю элемент - количество элементов кратных 5 - сумму элементов массива, расположенных между первым и последним положительными элементами.

235

494

Посмотреть ответы 2

Ответы на вопрос:

tanya2119286

Информатика

4,5(72 оценок)

Pascalabc.net 3.4.0, сборка 1671 от 31.05.2018 внимание! если программа не работает, обновите версию! begin var a: =arrrandom(readinteger('n=',10); a.println; writeln('минимальный по модулю элемент равен ', a.select(t-> abs(); writeln('количество элементов, кратных 5, равно ', a.where(t-> t mod 5=0).count); write('сумма искомых элементов равна '); var ai: =a.indexesof(t-> t> 0); a[ai.first+1: ai.last].sum.println; end.