Форум программистов, компьютерный форум, киберфорум
Python: Решение задач
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.86/183: Рейтинг темы: голосов - 183, средняя оценка - 4.86
0 / 0 / 0
Регистрация: 28.09.2021
Сообщений: 40

Определите количество троек, в которых хотя бы два из трёх элементов меньше

13.01.2022, 19:42. Показов 38325. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
В файле 17-1.txt содержится последовательность целых чисел. Элементы последовательности могут принимать целые значения от –10 000 до 10 000 включительно. Определите количество троек, в которых хотя бы два из трёх элементов меньше, чем среднее арифметическое всех чисел в файле, и десятичная запись всех трёх элементов тройки содержит цифру 1. В ответе запишите два числа: сначала количество найденных троек, а затем – максимальную сумму элементов таких троек. В данной задаче под тройкой подразумевается три идущих подряд элемента последовательности.
Вложения
Тип файла: doc 17-1.doc (62.4 Кб, 72 просмотров)
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
13.01.2022, 19:42
Ответы с готовыми решениями:

Определите сначала количество троек элементов последовательности, в которых хотя бы два числа в двоичной системе счислен
В файле содержится последовательность целых чисел. Элементы последовательности могут принимать значения от 0 до 1100 включительно....

Определите количество троек чисел, в которых хотя бы один из элементов больше, чем число, взятое из первых 4-х символов
В файле 17_20.doc содержится последовательность целых чисел. Элементы последовательности могут принимать целые значения от 0 до 10 000...

Количество троек элементов последовательности, хотя бы одно число из которых делится на 5, и сумму минимальных чисел
В файле 17-10.txt содержится последовательность целых чисел. Элементы последовательности могут принимать значения от 0 до 10000...

1
2431 / 1474 / 633
Регистрация: 01.11.2021
Сообщений: 2,269
13.01.2022, 20:29
Лучший ответ Сообщение было отмечено DarkKIr как решение

Решение

Python
1
2
3
4
5
6
7
8
9
10
11
12
13
with open('in.txt', 'r', encoding='utf-8') as f:
    file = f.readlines()
    arr = list(map(int, file))
 
avg = sum(arr) / len(arr)
 
res = []
for i in range(len(arr) - 2):
    if sum(x < avg  for x in (arr[i:i+3])) > 1:
        if all('1' in str(x) for x in arr[i:i+3]):
            res.append(sum(arr[i:i+3]))
print(len(res))
print(max(res))
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
13.01.2022, 20:29
Помогаю со студенческими работами здесь

Определите количество пар, в которых хотя бы один из двух элементов делится на 3
Файл содержит последовательность неотрицательных целых чисел, не превышающих 10 000. Назовём парой два идущих подряд элемента...

Определить количество элементов массива, у которых два соседних элемента меньше заданного
Дан массив, состоящий из целых чисел. Напишите программу, которая в данном массиве определит количество элементов, у которых два соседних...

В массиве определить количество элементов, у которых два соседних элемента меньше заданного
Дан массив, состоящий из целых чисел. Напишите программу, которая в данном массиве определит количество элементов, у которых два соседних...

Определите общее количество отрицательных элементов,расположенных в тех строках матрицы, каждая из которых содержит хотя бы один отрицательный элемент
помогите пожалуйста написать прогу на С++

Определите количество пифагоровых троек из идущих подряд элементов последовательности
Нужно написать программу, выполняющую один раз ввод последовательности целых чисел, признаком конца которой будет ввод числа ноль (ноль...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Реалии
Hrethgir 01.03.2026
Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .
Ритм жизни
kumehtar 27.02.2026
Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .
SDL3 для Web (WebAssembly): Сборка библиотек: SDL3, Box2D, FreeType, SDL3_ttf, SDL3_mixer и SDL3_image из исходников с помощью CMake и Emscripten
8Observer8 27.02.2026
Недавно вышла версия 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual Studio. . . .
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами
8Observer8 20.02.2026
Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .
Конвертировать закладки radiotray-ng в m3u-плейлист
damix 19.02.2026
Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .
Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI
Eddy_Em 18.02.2026
Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru