Question

составьте программу ввода с клавиатуры элементов массива a 1..10 случайными целыми числами в диапазоне от 1 до 20 и выводит на экран элементы, занчения которых больше 5 и мешьше 15.

Answer 1

CONST
n=10;
var mas:array[1..10] of integer;
i:integer;
begin
randomize;
//ввод массива и его вывод на экран
for i:=1 to n do begin
mas[i]:=random(19)+1;
write(mas[i]:4);
if (i=5) then writeln;
end;
//поиск чисел
writeln;
write('Искомые числа: ');
for i:=1 to n  do
if (mas[i]>5) and (mas[i]<15) then write (mas[i]:4);
end.

Answer 2

Программа на языке Python для решения задачи:

pythonCopy code
import random

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

# Выводим массив на экран
print("Массив a:", a)

# Итерируемся по элементам массива и выводим на экран только те элементы, которые удовлетворяют условию
print("Элементы массива, большие 5 и меньшие 15:")
for i in a:
    if i > 5 and i < 15:
        print(i)

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

yamlCopy code
Массив a: [9, 1, 6, 13, 15, 1, 3, 3, 17, 16]
Элементы массива, большие 5 и меньшие 15:
9
6
13