Question

Заполнить очередь 14 целыми числами из интервала [0;80]. Найти целую часть среднего арифметического кратных 5 элементов очереди. Результат поместить в очередь. Удалить 5 элемент из очереди. После выполнения каждой операции выводить содержимое очереди на экран.

Answer 1

// PascalABC.NET 3.4.2, сборка 1797 от 22.09.2018

// Внимание! Если программа не работает, обновите версию!

begin

 var Q := new Queue<integer>;

 SeqRandom(14, 0, 80).ForEach(t -> begin Q.Enqueue(t) end); // заполнили

 Q.Println;

 var m := Trunc(Q.Where(t -> t mod 5 = 0).DefaultIfEmpty.Average); // среднее

 Q.Enqueue(m);

 Q.Println;

 // удаление

 var L:=Q.ToList; // переписать в список

 L.RemoveAt(4); // удалить 5-й элемент

 Q.Clear; // очистить очередь

 foreach var t in L do // поэлементное добавление

   Q.Enqueue(t);

 Q.Println

end.

Answer 2

Давайте выполним задачу поэтапно:

1. Создайте очередь (queue) и наполните её 14 случайными целыми числами из интервала [0; 80].
2. Найдите целую часть среднего арифметического только кратных 5 элементов очереди.
3. Результат (целую часть среднего арифметического) поместите обратно в очередь.
4. Удалите 5 элементов из очереди.
5. Повторяйте шаги 2-4 до тех пор, пока в очереди остаются элементы.

Вот пример кода на Python, который реализует эту задачу:

pythonCopy code
import random
from collections import deque

# Создаем очередь и наполняем её 14 случайными числами из [0; 80]
queue = deque(random.sample(range(81), 14))
print("Начальная очередь:", list(queue))

while len(queue) >= 5:
    # Найдем среднее арифметическое кратных 5 элементов в очереди
    divisible_by_5 = [x for x in queue if x % 5 == 0]
    if divisible_by_5:
        average = sum(divisible_by_5) // len(divisible_by_5)
        # Помещаем целую часть среднего арифметического обратно в очередь
        queue.append(average)
        # Удаляем 5 элементов из очереди
        for _ in range(5):
            queue.popleft()
        print("Среднее арифметическое кратных 5:", average)
        print("Очередь после удаления 5 элементов:", list(queue))
    else:
        # Если нет кратных 5 элементов, просто удаляем 5 элементов из очереди
        for _ in range(5):
            queue.popleft()
        print("Нет кратных 5 элементов, удаляем 5 элементов из очереди")
        print("Очередь после удаления 5 элементов:", list(queue))

print("Окончательная очередь:", list(queue))

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