Question

дан одномерный массив а заполненный случайным образом в диапазоне [-60;55] размерность массива 12 элементов составить программу получения массива в состоящего только из чисел массива а кратных задонному числу

Answer 1

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

begin

 var a := ArrRandom(12, -60, 55);

 a.Println;

 var m := ReadInteger('Укажите число для поиска кратных:');

 var b := a.Where(p -> p mod m = 0).ToArray;

 if b.Length = 0 then

   Print('Таких чисел нет')

 else

   b.Println

end.

Answer 2

Для создания программы, которая создает новый массив, содержащий только числа из массива "a", которые кратны заданному числу, вы можете использовать следующий код на языке Python:

pythonCopy code
import random

# Задаем размерность массива
размерность = 12

# Задаем диапазон чисел
нижний_предел = -60
верхний_предел = 55

# Задаем число, которому числа должны быть кратны
заданное_число = 5  # Замените на нужное число

# Создаем массив "a" с случайными числами
a = [random.randint(нижний_предел, верхний_предел) for _ in range(размерность)]

# Создаем новый массив, содержащий только числа, кратные заданному числу
новый_массив = [число for число in a if число % заданное_число == 0]

# Выводим исходный массив "a" и новый массив
print("Исходный массив a:", a)
print(f"Новый массив, содержащий числа кратные {заданное_число}:", новый_массив)

Замените значение переменной заданное_число на нужное вам число. Этот код создаст массив "a" из случайных чисел в заданном диапазоне и затем создаст новый массив, содержащий только числа из "a", которые кратны заданному числу.