Question

Составьте программу,, которая заполняет массив а[1..20] случайными целыми числами в диапазоне от 1 до 30 и выводит наэкран элементы , значения которых являются четными и кратными3.

Answer 1

Program Task;
Var a: Array [1..20] of Integer;
i: Integer;
Begin
For i := 1 To 20 Do
Begin
a[i] := Random(30) + 1;
If a[i] Mod 3 = 0 Then
Write(a[i], ' ');
End;
ReadLn;
End.

Answer 2

Конечно, вот пример программы на языке Python, который создает массив из 20 случайных целых чисел в диапазоне от 1 до 30, затем выводит элементы, значения которых являются четными и кратными 3:

import random

# Создание массива из 20 случайных чисел
a = [random.randint(1, 30) for _ in range(20)]

# Вывод массива
print("Исходный массив:")
print(a)

# Поиск и вывод элементов, четных и кратных 3
print("\nЭлементы, значения которых являются четными и кратными 3:")
for num in a:
    if num % 2 == 0 and num % 3 == 0:
        print(num, end=" ")

Этот код использует модуль `random`, чтобы создать массив `a` из 20 случайных чисел в диапазоне от 1 до 30. Затем он проходит по элементам массива и проверяет, является ли число как четным, так и кратным 3, и выводит их значения.