Question

Дан целочисленный массив из 20 элементов, из промежутка [-100; 50]. Напишите программу позволяющую найти и вывести минимальное значение среди положительных элементов массива, кратных 5 Если в исходном массиве нет элемента, значение которого положительно и делится на 5, то вывести сообщение «Не найдено».

Answer 1

var    

i, answer: integer;  

arr: array[-100..50] of integer;  

begin  

answer := -1;  

for i:= 0 to 19 do  

begin  

read(arr[i]);  

if ((arr[i] > 0) and (arr[i] mod 5 = 0) and (arr[i] > answer)) then answer := arr[i];  

end;  

  if answer = -1 then writeln('Не найдено')  

  else writeln(answer);  

end.

Answer 2

Конечно, вот пример программы на языке Python, который выполняет указанную задачу:

pythonCopy code
# Создаем массив из 20 случайных чисел
import random

array = [random.randint(-100, 50) for _ in range(20)]

# Инициализируем переменную для хранения минимального положительного элемента, кратного 5
min_positive_multiple_of_5 = None

# Проходим по элементам массива и ищем подходящие значения
for num in array:
    if num > 0 and num % 5 == 0:
        if min_positive_multiple_of_5 is None or num < min_positive_multiple_of_5:
            min_positive_multiple_of_5 = num

# Выводим результат
if min_positive_multiple_of_5 is not None:
    print("Минимальное положительное значение, кратное 5:", min_positive_multiple_of_5)
else:
    print("Не найдено")

Программа создает массив из 20 случайных чисел в указанном диапазоне. Затем она ищет минимальное положительное значение, кратное 5, среди элементов массива, и выводит его. Если такого элемента нет, выводится сообщение "Не найдено".