Mailing List CyrTeX-ru@vsu.ru Message #1654
From: Лидовский Владимир <CyrTeX-ru@vsu.ru>
Subject: лучший факториал?
Date: Tue, 29 Sep 2009 10:34:01 +0400
To: Cyrillic TeX Users Group <cyrtex-ru@vsu.ru>
Добрый день!
Вот функция-макрос для расчета факториала чисел от 0 до 12

\def\fact#1{{\def\fact##1{\ifnum##1<2 \count1=1 \else\count0=##1 \advance\count0by-1 \edef\x{{\the\count0}}\expandafter\fact\x\multiply\count1by##1\fi}\fact{#1} \the\count1}}

\fact{11} раскрывается в значение 11!. Может кто-нибудь знает более короткое и/или элегантное определение? Нужно только без псевдоитерации (скрытой рекурсии) по команде \loop и не должно быть побочных эффектов.

всем спасибо
Subscribe (FEED) Subscribe (DIGEST) Subscribe (INDEX) Unsubscribe Mail to Listmaster