Напишите программу которая в последовательности натуральных чисел находит среднее арифметическое трехзначных чисел или сообщает что таких чисел нет.

149

455

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

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

ktuj240

Информатика

4,7(26 оценок)

// pascalabc.net 3.1, сборка 1179 от 29.02.2016 begin var a: =arrrandom(readinteger('n='),1,150); a.println; var s: =a.where(x-> x in [100..999]); if s.count> 0 then writeln('ср.арифм. трехзначных ',a.average) else writeln('нет трехзначных чисел') end. тестовое решение: n= 10 143 67 131 52 39 135 42 83 105 142 ср.арифм. трехзначных 93.9