Пользователь вводит размерность и элементы одномерного массива натуральных чисел. Найти НОД максимального элемента массива и количество элементов в массиве. Вспомогательный алгоритм необходимо оформить в виде рекурсивной процедуры или функции в отдельный модуль.
potter-by
8.12.2011 23:03
В математике НОД ищется для двух и более чисел. По поводу количества элемента массива: если пользователь вводит размерность одномерного массива, то и количество элементов равно его размерности. Рекурсивный алгоритм поиска НОД:
function nod(m, n: integer): integer; var mm: integer; begin mm := m mod n; if mm = 0 then nod := n else nod := nod (n, mm) end;
Модуль создайте самостоятельно
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.