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

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

Примечание. Функция a Mod b вычисляет остаток от деления а на b.