Question

Дан массив из 15 элементов. Необходимо заполнить его с помощью оператора присваивания(Случайными числами) И вывести все элементы массива в строку, а затем на следующий строке вывести все элементы равны 5.

Answer 1

Const n=15;

Var i:Integer ;

A:array [1..15]of Integer ;

Begin

For i:=1 to n do begin

A[i]:=random(10);

Write (' A[', i, ']=', A[i]) ;

End;

Writeln ;

For i:=1 to n do begin

If a[i]=5 then write (' A[', i, ']=', A[i]) ;

End;

End.

Answer 2

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

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

pythonCopy code
import random

# Создаем массив из 15 элементов и заполняем его случайными числами от 1 до 10
array = [random.randint(1, 10) for _ in range(15)]

# Выводим все элементы массива в строку
print("Массив:")
print(" ".join(map(str, array)))

# Выводим все элементы равные 5 на следующей строке
print("\nЭлементы, равные 5:")
print(" ".join(str(num) for num in array if num == 5))

Пример вывода:

makefileCopy code
Массив:
2 5 9 3 5 8 6 1 10 4 2 3 9 8 6

Элементы, равные 5:
5 5

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