発言者: 田中徹
発言日: 2005 06/19 02:17
発言元: p6e1c6c.nigtnt01.ap.so-net.ne.jp
エラー処理無し
整数決めうち
変数名いい加減の間に合わせのソースです。
階差数列を適当に弄ってください。
# 配列処理で \csname や \romannumeral は勉強させていただきました > tDB 様
\documentclass{jarticle}
\usepackage{emathP}
\usepackage{hako}
\hakosenhaba{.4pt}
\maskhakofalse
%\maskhakotrue
%%%%% 次の3つで決定 %%%%%%%%%
\def\初項{1}
\def\階差数列{2**X-1}%<=Perl書式
\def\項数{5}%<= 階差数列の表示項数
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\begin{document}
\hakosenhaba{.4pt}
\hakoxyohaku{0pt}
\sityuu[36pt]{2zh}
\IAdd\項数{1}\終値
\IAdd\項数{3}\最終値
\IAdd\項数{4}\終了値
\edef\数列{\初項,}
\def\An{\初項}
\Ifor\Cnt{1}{\終値}\Do{
\funcval[d]\階差数列\Cnt\Bn
\Add\An\Bn\An
\edefappend\数列{\An,}
}
\begin{manDrawHatS}[hukasa=3pt,kugirisi={,}\kern 3.2em]
{\数列\cdots\cdots,a_{n-1},a_n}%
\Ifor\Cnt{1}{\終了値}\Do{
\IAdd\Cnt{1}\IncCnt
\edef\PosL{\csname DHSB\romannumeral\Cnt \endcsname}
\edef\PosR{\csname DHSB\romannumeral\IncCnt \endcsname}
\funcval[d]\階差数列\Cnt\Bn
\ifnum\Cnt<\終値
\HenKo<henkotype=2,putoption={(2pt,-2pt)[t]}>\PosL\PosR{{\protect\maskHako (1.7zw)[1.25zh][.5zh]{\Bn}},}
\ifnum\Cnt=1
\edef\P{\HenKoTyuuten}%
\fi
\fi
\ifnum\Cnt=\最終値
\HenKo<henkotype=2,putoption={(2pt,-2pt)[t]}>\PosL\PosR{\protect\raisebox{-1.75zh}{,~$b_{n-1}$}}
\edef\Q{\HenKoTyuuten}%
\fi
}
\rotUbrace[depth=24pt]\P\Q{n-1~個}
\end{manDrawHatS}\\[20pt]
\end{document}
▼関連発言
│
└◆3255:\Ifor と \calcval で数列を表示する事は出来るのでしょうか? [穂積] 06/18 21:58
└◆3256:Re:\Ifor と \calcval で数列を表示する事は出来るのでしょう... [田中徹] 06/19 02:17
└◆3257:Re[2]:\Ifor と \calcval で数列を表示する事は出来るのでし.. [穂積] 06/19 21:25
└◆3258:Re[3]:\Ifor と \calcval で数列を表示する事は出来るので.. [田中徹] 06/19 22:45
└◆3265:質問にも答えて頂きありがとうございました。 [穂積] 06/20 14:07<-last