発言者: 石原 守
発言日: 2008 02/10 13:21
発言元: 202.233.196.119
emathC の改訂ありがとうございます。
エクセルでやれば一瞬のことなんですが今朝は
三角比の表をつくりなおしていました。
1ページが新\EMroundで,2ページはperlで計算しています。
\documentclass[a4j]{jarticle}
\usepackage{emathC}[2008/02/10]
\usepackage{emathP}
\usepackage{emathT}
\def\keta{4}
\def\OutPut{%
\kaku\Deg
& \calcval[f]{Degsin(\kaku)}\Xs \EMround\Xs\keta\Xs \Xs
& \calcval[f]{Degcos(\kaku)}\Xc \EMround\Xc\keta\Xc \Xc
& \calcval[f]{Degtan(\kaku)}\Xt \EMround\Xt\keta\Xt \Xt
& \IAdd\kaku{45}\KAku \xdef\Kaku{\KAku} \Kaku\Deg
& \calcval[f]{Degsin(\Kaku)}\Xs \EMround\Xs\keta\Xs \Xs
& \calcval[f]{Degcos(\Kaku)}\Xc \EMround\Xc\keta\Xc \Xc
& \ifnum\Kaku>89
\text{---}
\else
\calcval[f]{Degtan(\Kaku)}\Xt \EMround\Xt\keta\Xt \Xt
\fi
}%
\def\OutPutI{%
\kaku\Deg
& \calcval[.4f]{emround(Degsin(\kaku),\keta)}\Xs \Xs
& \calcval[.4f]{emround(Degcos(\kaku),\keta)}\Xc \Xc
& \calcval[.4f]{emround(Degtan(\kaku),\keta)}\Xt \Xt
& \IAdd\kaku{45}\KAku \xdef\Kaku{\KAku} \Kaku\Deg
& \calcval[.4f]{emround(Degsin(\Kaku),\keta)}\Xs \Xs
& \calcval[.4f]{emround(Degcos(\Kaku),\keta)}\Xc \Xc
& \ifnum\Kaku>89
\text{---}
\else
\calcval[.4f]{emround(Degtan(\Kaku),\keta)}\Xt \Xt
\fi
}%
\begin{document}
\centering
\textgt{\Large 三角比の表}
\[
\begin{hyou}{IcIC{5zw}|C{5zw}|C{5zw}IIcIC{5zw}|C{5zw}|C{5zw}I}\hlineb
\theta & \sin\theta & \cos\theta & \tan\theta &%\\\hlineb
\theta & \sin\theta & \cos\theta & \tan\theta \\\hlineb
\xdef\Hajime{0}
\xdef\Owari{46}
\Cfor{\xdef\kaku{\Hajime}}{\kaku<\Owari}{%
\xIncr\kaku
\ifnum\kaku<\Owari
\IMod\kaku{5}\modv%
\ifnum\modv=1\relax
\\\hline
\else
\\
\fi%
\fi%
}\do{\OutPut}%
\\\hlineb
\end{hyou}
\]
\newpage
\centering
\textgt{\Large 三角比の表}
\[
\begin{hyou}{IcIC{5zw}|C{5zw}|C{5zw}IIcIC{5zw}|C{5zw}|C{5zw}I}\hlineb
\theta & \sin\theta & \cos\theta & \tan\theta &%\\\hlineb
\theta & \sin\theta & \cos\theta & \tan\theta \\\hlineb
\xdef\Hajime{0}
\xdef\Owari{46}
\Cfor{\xdef\kaku{\Hajime}}{\kaku<\Owari}{%
\xIncr\kaku
\ifnum\kaku<\Owari
\IMod\kaku{5}\modv%
\ifnum\modv=1\relax
\\\hline
\else
\\
\fi%
\fi%
}\do{\OutPutI}%
\\\hlineb
\end{hyou}
\]
\newpage
\end{document}
▼関連発言
│
└◆7070:\EMround がエラー [石原 守] 02/10 09:19
└◆7071:Re:\EMround がエラー [tDB] 02/10 09:42
├◆7072:Re[2]:\EMround がエラー [石原 守] 02/10 09:52
└◆7073:Re[2]:\EMround がエラー [tDB] 02/10 11:50
└◆7074:Re[3]:\EMround がエラー [石原 守] 02/10 13:21
└◆7075:Re[4]:\EMround がエラー [tDB] 02/10 15:19
└◆7076:Re[5]:\EMround がエラー [石原 守] 02/10 15:49<-last