Как найти факториал в 1С: готовые функции и примеры кода

Факториал числа — это произведение всех натуральных чисел от 1 до заданного числа (например, 5! = 1 × 2 × 3 × 4 × 5 = 120). Во встроенном языке 1С нет готовой функции Факториал(), поэтому вычисление реализуют вручную — циклом или рекурсией. Задача типична для учебных заданий, математических обработок и расчётов комбинаторики внутри прикладных решений.

Ниже приведены рабочие варианты кода, которые можно вставить в общий модуль, модуль формы или внешнюю обработку. Разобраны ограничения типа «Число», причины переполнения результата и способы проверить корректность вычислений.

Что такое факториал и где он нужен в 1С

Факториал числа N (обозначается N!) — произведение всех целых чисел от 1 до N. По определению 0! = 1. Факториал растёт очень быстро: 10! = 3 628 800, а 20! — уже число из 19 цифр.

В прикладных решениях 1С факториал встречается нечасто, но бывает нужен в таких задачах:

• комбинаторные расчёты — число перестановок, сочетаний, вариантов комплектации;
• учебные и тестовые задания при обучении программированию на встроенном языке;
• математические и статистические обработки, вероятностные модели;
• проверочные примеры при освоении циклов, рекурсии и работы с функциями.

Вычисление факториала циклом — основной способ

Самый простой и надёжный вариант — цикл «Для». Создайте функцию в общем модуле или модуле формы:

Функция Факториал(Н) Экспорт
Если Н < 0 Тогда
ВызватьИсключение "Факториал определён только для неотрицательных чисел";
КонецЕсли;
Результат = 1;
Для Сч = 2 По Н Цикл
Результат = Результат * Сч;
КонецЦикла;
Возврат Результат;
КонецФункции

Логика проста: переменная Результат инициализируется единицей, затем последовательно умножается на 2, 3 и так далее до N. Для 0 и 1 цикл не выполнится ни разу, и функция вернёт 1 — это соответствует определению.

Функция Факториал(Н)
	Результат = 1;
	Для Сч = 2 По Н Цикл
		Результат = Результат * Сч;
	КонецЦикла;
	Возврат Результат;
КонецФункции

Обратите внимание на проверку отрицательного аргумента: без неё функция молча вернёт 1 для некорректных данных, что может скрыть ошибку в вызывающем коде.

Рекурсивный вариант функции

Факториал — классический пример для демонстрации рекурсии, когда функция вызывает сама себя:

Функция ФакториалРекурсивно(Н)
Если Н <= 1 Тогда
Возврат 1;
КонецЕсли;
Возврат Н * ФакториалРекурсивно(Н - 1);
КонецФункции

Рекурсия короче записывается, но на практике в 1С предпочтительнее цикл: каждый рекурсивный вызов расходует стек, и при больших N можно получить ошибку переполнения стека. Кроме того, рекурсивный код сложнее отлаживать.

Ограничение типа «Число» и переполнение

Главное ограничение при вычислении факториала в 1С — разрядность типа «Число». В платформе числа хранятся с фиксированной точностью (по умолчанию до 38 знаков в зависимости от настроек, но на практике точные целочисленные вычисления надёжны в меньшем диапазоне). Из-за этого:

• до примерно 20! результат вычисляется точно;
• при больших N возможна потеря точности или представление результата в экспоненциальной форме;
• точных значений для 50! или 100! штатными средствами типа «Число» получить нельзя.

Если задача требует больших факториалов (например, для точной комбинаторики), применяют алгоритмы умножения «в столбик» со строковым представлением числа — это существенно сложнее и обычно выходит за рамки типовых задач 1С.

Как проверить результат вычисления

Проверить функцию можно прямо в конфигураторе через отладку или выведя результат в сообщение:

Сообщить(Факториал(5));  // должно быть 120
Сообщить(Факториал(0));  // должно быть 1
Сообщить(Факториал(10)); // должно быть 3628800

Также полезно сверить значения с калькулятором или таблицей факториалов: 5! = 120, 6! = 720, 7! = 5040, 8! = 40320. Этого достаточно, чтобы убедиться в корректности цикла.

Типичные ошибки при реализации

Где разместить функцию в конфигурации

Если факториал нужен в нескольких местах, вынесите функцию в общий модуль с флагом «Сервер» (и «Вызов сервера», если обращение идёт с клиента). Для разовой обработки достаточно модуля объекта внешней обработки или модуля формы.

1. 1
   Создайте общий модуль (например, МатематикаСервер) или откройте модуль обработки.
2. 2
   Добавьте функцию Факториал с проверкой отрицательного аргумента и циклом умножения.
3. 3
   Вызовите функцию из нужного места: Результат = МатематикаСервер.Факториал(5).
4. 4
   Проверьте контрольные значения: 0! = 1, 5! = 120, 10! = 3628800.
5. 5
   Убедитесь, что N не превышает ~20, иначе задумайтесь о длинной арифметике.

Для управляемых форм помните о разделении контекста: если функция объявлена в серверной процедуре (&НаСервере), вызывать её из клиентского кода напрямую нельзя.

Когда факториал лучше не вычислять напрямую

В комбинаторных формулах факториалы часто сокращаются. Например, при расчёте числа сочетаний вместо трёх факториалов достаточно перемножить k множителей от (n−k+1) до n и разделить на k!. Это и быстрее, и безопаснее с точки зрения переполнения.

Если факториалы используются многократно в цикле расчётов, эффективнее вычислить их один раз и сохранить в соответствие или массив — повторные вызовы функции на больших объёмах данных дают лишнюю нагрузку.

Частые вопросы