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

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

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