Вс алгоритмы третья задача информатика 9 класс​

Так как язык не указан, приведу пример на SWI-Prolog.

Код:

read_int(Int) :- read(Int), integer(Int).split_int_by_numbers(0, []) :- !.split_int_by_numbers(N, [Number|Ints]) :- Number is mod(N, 10), RestN is div(N, 10), split_int_by_numbers(RestN, Ints).test_to_div(_, []).test_to_div(N, [Number|Ints]) :- mod(N, Number) =:= 0, test_to_div(N, Ints). test(Int) :- split_int_by_numbers(Int, Numbers), test_to_div(Int, Numbers), write(Int), write(" - Yes!"), nl.test(Int) :- write(Int), write(" - No!"), nl.?- read_int(Int), test(Int).

Конечно, я могу помочь тебе с написанием программы на Python, чтобы найти более приятные занятия, у которых есть более 4 общих символа с контрольной фразой.

Вот как может выглядеть программа:

```python
def find_pleasant_activities(phrase, activities):
pleasant_activities = []
for activity in activities:
common_chars = set(phrase).intersection(set(activity))
if len(common_chars) > 4:
pleasant_activities.append(activity)
return pleasant_activities


control_phrase = "красивые и приятные вещи"
all_activities = ["пенал", "кожаный ранец", "скрипящий", "картинки", "перила", "лестница"]
result = find_pleasant_activities(control_phrase, all_activities)

print("Приятные занятия, у которых есть более 4 общих символа с контрольной фразой:")
for activity in result:
print(activity)
```

Давай разберем эту программу по шагам:

1. Создаем функцию `find_pleasant_activities`, которая принимает два параметра: `phrase` (контрольную фразу) и `activities` (список всех занятий).

2. Инициализируем пустой список `pleasant_activities`, в котором будем хранить приятные занятия.

3. Используем цикл `for` для перебора всех занятий из списка `activities`.

4. Внутри цикла на каждой итерации находим общие символы между контрольной фразой и текущим занятием, используя метод `intersection` множеств.

5. Проверяем, если количество общих символов больше 4, то добавляем текущее занятие в список `pleasant_activities`.

6. Возвращаем список `pleasant_activities` из функции.

7. Определяем контрольную фразу `control_phrase` и список всех занятий `all_activities`.

8. Вызываем функцию `find_pleasant_activities` с передачей контрольной фразы и списка занятий.

9. Выводим сообщение и перебираем элементы списка `result`, выводя каждое приятное занятие на отдельной строке.

Таким образом, программа будет выводить приятные занятия, у которых есть более 4 общих символа с контрольной фразой ("красивые и приятные вещи" в данном случае).