Question

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

Answer 1

===== PascalABC.NET =====

!!! Запускать комбинацией клавиш Shitf + F9 !!!

uses System;

begin

 var (n, k) := ReadInteger2('Задай длину массива и значение k:');

 var a := ArrRandom(n, -99, 99);

 var (s, m) := (0, 0);

 foreach var p in a do

 begin

   if (p > k) and (p mod 5 = 0) then

   begin

     Console.ForegroundColor := ConsoleColor.Magenta;

     s += p;

     m += 1

   end  

   else

     Console.ResetColor;

   Console.Write(p + ' ')

 end;

 Console.WriteLine;

 Console.ResetColor;

 Println('Сумма =', s, '   количество =', m)

end.

Answer 2

Для выполнения этой задачи вам понадобится код на языке программирования. Ниже представлен пример решения на языке Python:

pythonCopy code
def main():
    # Получение размера массива и числа K с клавиатуры
    n = int(input("Введите размер массива: "))
    k = int(input("Введите число K: "))

    # Создание массива с случайными числами
    import random
    arr = [random.randint(1, 100) for _ in range(n)]

    # Выделение сиреневым цветом и подсчёт элементов, удовлетворяющих условию
    count = 0
    total_sum = 0
    for num in arr:
        if num > k and num % 5 == 0:
            print(f"\033[1;35m{num}\033[0m", end=" ")  # Выделение сиреневым цветом
            count += 1
            total_sum += num
        else:
            print(num, end=" ")
    print()  # Перевод строки после вывода массива

    print(f"Количество элементов, удовлетворяющих условию: {count}")
    print(f"Сумма элементов, удовлетворяющих условию: {total_sum}")


if __name__ == "__main__":
    main()

Обратите внимание, что для выделения сиреневым цветом чисел в консоли, используется управляющая последовательность ANSI: \033[1;35m{num}\033[0m. В большинстве терминалов и IDE такие управляющие последовательности поддерживаются, и числа, удовлетворяющие условию, будут выведены сиреневым цветом. Если ваш терминал не поддерживает ANSI-коды, то выделение цветом может не работать, и числа просто будут выведены обычным шрифтом.

После выполнения программы будут выведены массив с отмеченными сиреневым цветом числами, удовлетворяющими условию, а также количество и сумма таких чисел.