Question

Задайте 20 элементов массива случайным образом на интервале от 10 до 120. Найти количество чисел превышающих 50. Найти минимальные значения. Найти произведения смех чисел

Answer 1

var

a:array [1..20] of integer;

i,k,mi: integer;

p:real;

begin

p:=1;

write ('Массив: ');

for i:=1 to 20 do

begin

a[i] := Random(111)+10;

write(a[i],' ');

if a[i]>50 then k:=k+1;

p:=p*a[i]

end;

writeln;

writeln ('Количество чисел больше 50 равно: ',k);

writeln ('Произведение всех чисел равно: ',p);

mi:=1;

for i:=2 to 20 do

if a[mi]>a[i] then mi:=i;

writeln ('Минимальный элемент равен: ',a[mi])

end.

Answer 2

Хорошо, вот решение на языке Python:

pythonCopy code
import random

# Зададим пустой список для хранения случайных чисел
array = []

# Заполняем массив случайными числами на интервале от 10 до 120
for _ in range(20):
    random_number = random.randint(10, 120)
    array.append(random_number)

# Выведем получившийся массив
print("Сгенерированный массив:", array)

# Найдем количество чисел, превышающих 50
count_greater_than_50 = sum(1 for num in array if num > 50)
print("Количество чисел, превышающих 50:", count_greater_than_50)

# Найдем минимальное значение в массиве
min_value = min(array)
print("Минимальное значение в массиве:", min_value)

# Найдем произведение всех чисел в массиве
product = 1
for num in array:
    product *= num
print("Произведение всех чисел в массиве:", product)

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