▼スレッド
│
└◇853:解答作成に便利なマクロ(順列・組合せ) [田中徹] 07/05 01:29

皆様いかがお過ごしですか。
お久しぶりです。

こちらは期末考査と
夏期講習の課題作成に時間が割かれています。

数学A の解答作成であったらよいな程度のマクロを作成したので
アップさせていただきます。
（相変わらず変数をはじめ、センスのないネーミングです。）

どなたかでもコーディングが楽になったと思っていただければ幸いです。

数年前、断念した加法定理の align 環境版は今度はできそうな気がしますが...


\documentclass[b5j]{jarticle}
\usepackage[notMy,papersize]{emath}

\pagestyle{empty}


\makeatletter%
\def\DispPerm#1#2{%
\def\@body{}%
\def\@追加数{#1}%
\Ifor*\@Cnt{1}{#2}\Do{%
\edefappend\@body{\@追加数}%
\ifnum\@Cnt=#2\relax\else%
\edefappend\@body{\!\times\!}%
\fi%
\ISub\@追加数{1}\@追加数%
}%
\@body%
}%
\def\DispCombi#1#2{%
\def\@分子body{\,}%
\def\@分母body{\,}%
\def\@分子追加数{#1}%
\def\@分母追加数{#2}%
\Ifor*\@Cnt{1}{#2}\Do{%
\edefappend\@分子body{\@分子追加数}%
\edefappend\@分母body{\@分母追加数}%
\ifnum\@Cnt=#2%
\edefappend\@分子body{\,}%
\edefappend\@分母body{\,}%
\else%
\edefappend\@分子body{\!\times\!}%
\edefappend\@分母body{\!\times\!}%
\fi%
\ISub\@分子追加数{1}\@分子追加数%
\ISub\@分母追加数{1}\@分母追加数%
}%
\Bunsuu{\@分子body}{\@分母body}%
}%
\makeatother%

\begin{document}
$\zyunretu{5}{3}=\DispPerm{5}{3}$

$6!=\DispPerm{6}{6}$

$\kumiawase{7}{3}=\DispCombi{7}{3}$
\end{document}