Дан целочисленный массив из 100 элементов. Элементы массива могут принимать целые значения от 1 до 500. Опишите на одном из языков программирования алгоритм, позволяющий найти и вывести минимальное значение среди элементов массива, которые делят максимальное значение элементов массива без остатка. Гарантируется, что в исходном массиве есть хотя бы один элемент, который делит максимальное значение элементов массива без остатка.
Исходные данные объявлены так, как показано ниже. Запрещается использовать переменные, не описанные ниже, но использовать все описанные переменные не обязательно.
В качестве ответа необходимо привести фрагмент программы, который должен находиться на месте многоточия. Вы можете записать решение также на другом языке программирования (укажите название и используемую версию языка программирования, например PascalABC 1.8). В этом случае вы должны использовать переменные, аналогичные переменным, используемым в алгоритме, с учётом синтаксиса и особенностей используемого вами языка программирования.
Пример фрагмента программы на языке PascalABC 1.8.
max := 1;
for i := 1 to N do
if (a[i] > max)
then
max := a[i];
min := 500;
for i := 1 to N do
if (a[i] < min) and (max mod a[i] = 0)
then
min := a[i];
writeln(min);