Дан одномерный массив натуральных чисел.определить количество элементов массива,сумма цифр которых больше 7.все алгоритмы оформить в отдельный модуль.

120

362

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

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

Deer22

Информатика

4,4(9 оценок)

// pascalabc.net 3.2, сборка 1370 от 24.12.2016 // внимание! если программа не работает, обновите версию! function s(n: integer): integer: =(n< 10? n: (n mod 10)+s((n div 10) mod 10)); begin var a: =arrrandom(readinteger('n='),1,50); a.println; writeln('k=',a.select(x-> s((x-> x> 7).count) end. пример: n= 15 29 33 40 49 20 12 43 50 22 40 36 33 35 43 49 k=5