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

286

439

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

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

zikov1995123

Информатика

4,6(38 оценок)

// pascalabc.net 3.2, сборка 1439 от 09.05.2017 // внимание! если программа не работает, обновите версию! begin readlnstring.matchvalues('\d+').select(w-> (w,w.distinct .orderby(c-> c).joinintostring(''(t-> t[1]) .where(x-> x.count> 1).select(x-> x.unziptuple.item1. select(x-> x.tointeger).average).println; end. пример это 3242 такая 181 вот 346 странная 432 1118 строка 1837 649.5 как все это работает (функциональное программирование) readlnstring - считываем строку с клавиатуры .matchvalues('\d+') - выбираем подстроки символов, состоящие из цифр .select(w-> (w,w.distinct.orderby(c-> c).joinintostring('' - эта сложная конструкция сначала в каждой подстроке оставляет только разные цифры и сортирует их в порядке возрастания, затем соединяет эти цифры в строку и объединяет исходную подстроку с полученной строкой в так называемый кортеж. полученный кортеж для каждой исходной подстроки содержит два элемента: саму подстроку и строку из уникальных цифр этой подстроки, расположенных по возрастанию. .groupby(t-> t[1]) - группирует кортежи в более крупные блоки так, чтобы каждый блок содержал кортежи, у которых второй элемент одинаков. .where(x-> x.count> 1) - оставляет только те блоки, в которых больше одного кортежа, ведь нам не нужны "числа-одиночки" .select(x-> x.unziptuple.item1 - техническая операция, превращающая в каждом блоке кортеж в последовательность подстрок, представляющих исходные числа .select(x-> x.tointeger) - каждая такая последовательность подстрок превращается в последовательность целых чисел .average) - находятся средние арифметические каждой последовательности .println - вывод всех найденных значений. все это не так уж просто, но и далеко не тривиальное. если записать его средствами "традиционного паскаля" - такого примерно, как free pascal, код будет

thewitefox

Информатика

4,8(52 оценок)

похоже тут нет решения

Объяснение:

самое приближенное значение b это 26, ибо остальные значения - это не натуральные числа.

48+4=52

52/26=2

2+4=6

6+4=10

10+4=14

---------------------------

Либо тут порядок команд в другую сторону.

b=5, если будет 11121

48+4+4+4=60

60/5=12

12+4=16

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.