Дан одномерный массив целых чисел. Проверить, делится ли максимальный элемент…

Не сказано, на каком языке, поэтому я пишу алгоритм. Вводим массив A (n) Max=A (1) Цикл по i от 2 до nЕсли A (i) > Max То Max=A (i) Конец циклаЕсли Max Mod 15=0 То Выводим «Делится! ", Иначе Выводим «Не делится! "КонецПримечание. Функция a Mod b вычисляет остаток от деления а на b.