emath saloon

新規発言一覧最新記事過去一覧検索HOME

スレッド

└◇1502:
共通テスト用Hakoを用いた雛形例 [田中徹] 09/05 19:21


1502● 共通テスト用Hakoを用いた雛形例[ 田中徹 ] 2020 09/05 19:21
saloon 前スレッドの続きになります。
こんな形で,試験用紙を作成しているという一例です。
何か参考にしていただければ幸いです。

掲載の後半は,私の emathMy.sty になります。

\documentclass[b4j,fleqn,dvipdfmx]{jsarticle}

\usepackage[papersize={257truemm,365truemm}]{geometry}
\geometry{top=15mm,bottom=25mm,headsep=0mm,footskip=0mm,left=12mm,right=12mm}

\usepackage[papersize]{emathP}
%\usepackage[maskAnstrue]{emathAe}
\usepackage[maskAnsfalse]{emathAe}
\usepackage{hako}
\usepackage{yhmath}
\usepackage[T1]{fontenc}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\usepackage{fancyhdr}
\renewcommand{\headrulewidth}{0.0pt}
\renewcommand{\footrulewidth}{0.0pt}
\pagestyle{fancy}
\fancyhead{}
\fancyfoot{}
\lhead{}
\chead{}
\rhead{}
\lfoot{}
\cfoot{}
%\rfoot{\Kakko{\textbf{裏面は解答・解説です}}}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%



\setlength{\parindent}{1zw}
\setlength{\columnsep}{6mm}
\setlength{\columnseprule}{0.1mm}
\ifdefined\mathindent
\setlength{\mathindent}{10mm}
\fi

\ifdefined\OrgBaselineskip
\relax\else
\newlength{\OrgBaselineskip}
\setlength{\OrgBaselineskip}{\baselineskip}
\fi

%\pagestyle{empty}


\def\KaitouTTL{\mathindent=3mm\bigskip\color{black}\relax}

\ifmaskAns
\def\AnsCol{white}%
\maskhakotrue%
\else
\def\AnsCol{red}%
\def\AnsCol{black}%
\maskhakofalse%
\fi

\def\Haiten#1{{\color{\AnsCol}$\maru{#1}$}}
\everymaskHako{\color{\AnsCol}}%


\def\HaitenBox#1#2{
\begin{Hyou}{@{\!\!}c@{\!\!}}%
\ifmaskAns\mbox{}\else{$\text{\color{red}{\TrainingFont{#2}}}$}\fi\\
\HakoKaiKata{t}
\inputHakoKaiFile[#1]
%\scalebox{0.95}{#1}
\end{Hyou}
\!\!\!\!
}

\def\TestDate{YYYY/MM/DD}
\def\TITLE{{\Large\textbf{第三学年\  数学 } \textbf{ 朝テスト}}}
\def\Sign{%
\underline{\ 3年\qquad{}組\qquad{}番\quad{}氏名\hspace*{14zw}\ }\ %
}

\begin{document}
\preEqlabel{\cdotfill[0.15\linewidth]}
\preHEqlabel{\cdotfill[0.15\linewidth]}
\refcurrentenum%
\CapOn%
\abovedisplayskip=2mm%
\belowdisplayskip=2mm%
\abovedisplayshortskip=2mm%
\belowdisplayshortskip=2mm%
\def\baselinestretch{1.4}%
\baselineskip=\baselinestretch\OrgBaselineskip%
\enumLmargin{1zw}%
\edaLmargin{1zw}%
\twocolumn[%
{\TITLE }%
\quad{}%
{\tt(\TestDate)}
\hfill{}
\Sign%
{
\begin{zahyou*}[ul=10mm](0,2)(0,0.5)%
\Thicklines%
\tenretu*{O(0,0);A(\xmax,0);B(\xmax,1.5);C(0,1.5)}%
\Takakkei{\O\A\B\C}%
\protect\expandafter{\Put\A[nw]{\small\texttt{/30}}}
\protect\expandafter{\Put\O[se]{\small{}21点以上が合格}}%
\end{zahyou*}%
}

\vspace*{3mm}

\begin{squarebox}%
\begin{itemize}%
\def\labelitemi{※\;}
\item %
解答欄に適切な数字を記入すること。%途中の計算もきちんと書くこと。途中計算なしで解答できる問題もあるが、\textbf{必要な計算がない場合、評価しないこともある。}
%解答欄に適切な数字,文字,符号を記入すること。%途中の計算もきちんと書くこと。途中計算なしで解答できる問題もあるが、\textbf{必要な計算がない場合、評価しないこともある。}
%\item %
%$\nagamaru{0}$は $0$ ,$\nagamaru{1}$は $1$のように記入してかまわない。
\end{itemize}%
\end{squarebox}%


\vspace*{3mm}
]
\refcurrentenum%

\hakosyokika
\ifmaskAns
\hakokaisyotai{\boldmath\color{white}\ensuremath}
\else
\hakokaisyotai{\boldmath\color{red}\ensuremath}
\fi
\centermodetrue
\apnlist{%
\topsep=3pt
\parindent=1zw
}
\resetcounter{equation}[enumi]

\begin{Enumerate*}%
\parindent=1zw
\item %
最大公約数が $7$,最小公倍数が $84$である 2つの自然数 $a$,$b$ $\Par{a<b}$の組を求めると,
\[
\Cord{a}{b}=\retu{\openHakoKaiFile[101]\Cord{\Hako'7'}{\Hako'84'},\openHakoKaiFile[102]\Cord{\Hako'21'}{\Hako'28'}}\quad\text{である。}
\]

\begin{Kaitou}%
\end{Kaitou}%

\vfill{}%

\item %
\mbox{}
\begin{enumerate}%
\itemindent=2mm
\parindent=1zw%
\item %
2進法で表された 2つの数 $1101_{(2)}$ と $10101_{(2)}$の和を 2進法で表すと 
\openHakoKaiFile[201]
$\Hako'100010'_{(2)}$で,10進法で表すと 
\openHakoKaiFile[202]
$\Hako'34'$となる。

\item %
\openHakoKaiFile[203]
10進法で表された小数 $0.375$は $0.375=0.25+0.125$より,2進法で表すと $0.\Hako'011'_{(2)}$となる。

\end{enumerate}%

\begin{Kaitou}%
\end{Kaitou}%
\vfill{}%

\newpage%
\item %
\openHakoKaiFile[301]
$1800$の正の約数の個数は $\Hako'36'$個で,
\openHakoKaiFile[302]
正の約数の総和は $\Hako'6045'$である。

\begin{Kaitou}%
\end{Kaitou}%
\vfill{}%

\item %
\resetcounter{equation}
$xy-2x+y-5=0\Houteishiki{}$は次のように変形できる。
\[
\openHakoKaiFile[401]
\Par{x+\Hako'1'}\!\Par{y-\Hako'2'}=\Hako'3'
\]

したがって $\maru{1}$を満たす,\namikasen{$0$以上の整数} $x$,$y$の組は,次の 2組である。
\[
\Cord{x}{y}=\retu{\openHakoKaiFile[402]\Cord{\Hako[解1x]'0'}{\Hako'5'},\openHakoKaiFile[403]\Cord{\Hako[解2x]'2'}{\Hako'3'}}
\]
\Hfill{\Kakko{ただし,$\refHako*{解1x}<\refHako*{解2x}$}}

\begin{Kaitou}%
\end{Kaitou}%
\vfill{}%

\item %
\openHakoKaiFile[501]
$\Dfrac{1}{7}$は小数で表すと,$\Hako'6'$桁の循環節をもつ。
\openHakoKaiFile[502]
したがって $\Dfrac{1}{7}$の小数第 300位の数は $\Hako'7'$で,%
\openHakoKaiFile[503]
小数第 2021位の数は $\Hako'5'$である。

\begin{Kaitou}%
\end{Kaitou}%
\vfill{}%

\end{Enumerate*}%

\lfoot{
\HaitenBox{101}{3}
\HaitenBox{102}{3}
\;
\HaitenBox{201}{2}
\HaitenBox{202}{2}
\HaitenBox{203}{2}
\;
}
\rfoot{
\HaitenBox{301}{3}
\HaitenBox{302}{3}
\,
\HaitenBox{401}{2}
\HaitenBox{402}{2}
\HaitenBox{403}{2}
\,
\HaitenBox{501}{2}
\HaitenBox{502}{2}
\HaitenBox{503}{2}
}
\end{document}

%%%%%%%%%%% ここから emarhMy.sty
\documentclass[b4j,fleqn,dvipdfmx]{jsarticle}

\usepackage[papersize={257truemm,365truemm}]{geometry}
\geometry{top=15mm,bottom=25mm,headsep=0mm,footskip=0mm,left=12mm,right=12mm}

\usepackage[papersize]{emathP}
%\usepackage[maskAnstrue]{emathAe}
\usepackage[maskAnsfalse]{emathAe}
\usepackage{hako}
\usepackage{yhmath}
\usepackage[T1]{fontenc}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\usepackage{fancyhdr}
\renewcommand{\headrulewidth}{0.0pt}
\renewcommand{\footrulewidth}{0.0pt}
\pagestyle{fancy}
\fancyhead{}
\fancyfoot{}
\lhead{}
\chead{}
\rhead{}
\lfoot{}
\cfoot{}
%\rfoot{\Kakko{\textbf{裏面は解答・解説です}}}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%



\setlength{\parindent}{1zw}
\setlength{\columnsep}{6mm}
\setlength{\columnseprule}{0.1mm}
\ifdefined\mathindent
\setlength{\mathindent}{10mm}
\fi

\ifdefined\OrgBaselineskip
\relax\else
\newlength{\OrgBaselineskip}
\setlength{\OrgBaselineskip}{\baselineskip}
\fi

%\pagestyle{empty}


\def\KaitouTTL{\mathindent=3mm\bigskip\color{black}\relax}

\ifmaskAns
\def\AnsCol{white}%
\maskhakotrue%
\else
\def\AnsCol{red}%
\def\AnsCol{black}%
\maskhakofalse%
\fi

\def\Haiten#1{{\color{\AnsCol}$\maru{#1}$}}
\everymaskHako{\color{\AnsCol}}%


\def\HaitenBox#1#2{
\begin{Hyou}{@{\!\!}c@{\!\!}}%
\ifmaskAns\mbox{}\else{$\text{\color{red}{\TrainingFont{#2}}}$}\fi\\
\HakoKaiKata{t}
\inputHakoKaiFile[#1]
%\scalebox{0.95}{#1}
\end{Hyou}
\!\!\!\!
}

\def\TestDate{YYYY/MM/DD}
\def\TITLE{{\Large\textbf{第三学年\  数学 } \textbf{ 朝テスト}}}
\def\Sign{%
\underline{\ 3年\qquad{}組\qquad{}番\quad{}氏名\hspace*{14zw}\ }\ %
}

\begin{document}
\preEqlabel{\cdotfill[0.15\linewidth]}
\preHEqlabel{\cdotfill[0.15\linewidth]}
\refcurrentenum%
\CapOn%
\abovedisplayskip=2mm%
\belowdisplayskip=2mm%
\abovedisplayshortskip=2mm%
\belowdisplayshortskip=2mm%
\def\baselinestretch{1.4}%
\baselineskip=\baselinestretch\OrgBaselineskip%
\enumLmargin{1zw}%
\edaLmargin{1zw}%
\twocolumn[%
{\TITLE }%
\quad{}%
{\tt(\TestDate)}
\hfill{}
\Sign%
{
\begin{zahyou*}[ul=10mm](0,2)(0,0.5)%
\Thicklines%
\tenretu*{O(0,0);A(\xmax,0);B(\xmax,1.5);C(0,1.5)}%
\Takakkei{\O\A\B\C}%
\protect\expandafter{\Put\A[nw]{\small\texttt{/30}}}
\protect\expandafter{\Put\O[se]{\small{}21点以上が合格}}%
\end{zahyou*}%
}

\vspace*{3mm}

\begin{squarebox}%
\begin{itemize}%
\def\labelitemi{※\;}
\item %
解答欄に適切な数字を記入すること。%途中の計算もきちんと書くこと。途中計算なしで解答できる問題もあるが、\textbf{必要な計算がない場合、評価しないこともある。}
%解答欄に適切な数字,文字,符号を記入すること。%途中の計算もきちんと書くこと。途中計算なしで解答できる問題もあるが、\textbf{必要な計算がない場合、評価しないこともある。}
%\item %
%$\nagamaru{0}$は $0$ ,$\nagamaru{1}$は $1$のように記入してかまわない。
\end{itemize}%
\end{squarebox}%


\vspace*{3mm}
]
\refcurrentenum%

\hakosyokika
\ifmaskAns
\hakokaisyotai{\boldmath\color{white}\ensuremath}
\else
\hakokaisyotai{\boldmath\color{red}\ensuremath}
\fi
\centermodetrue
\apnlist{%
\topsep=3pt
\parindent=1zw
}
\resetcounter{equation}[enumi]

\begin{Enumerate*}%
\parindent=1zw
\item %
最大公約数が $7$,最小公倍数が $84$である 2つの自然数 $a$,$b$ $\Par{a<b}$の組を求めると,
\[
\Cord{a}{b}=\retu{\openHakoKaiFile[101]\Cord{\Hako'7'}{\Hako'84'},\openHakoKaiFile[102]\Cord{\Hako'21'}{\Hako'28'}}\quad\text{である。}
\]

\begin{Kaitou}%
\end{Kaitou}%

\vfill{}%

\item %
\mbox{}
\begin{enumerate}%
\itemindent=2mm
\parindent=1zw%
\item %
2進法で表された 2つの数 $1101_{(2)}$ と $10101_{(2)}$の和を 2進法で表すと 
\openHakoKaiFile[201]
$\Hako'100010'_{(2)}$で,10進法で表すと 
\openHakoKaiFile[202]
$\Hako'34'$となる。

\item %
\openHakoKaiFile[203]
10進法で表された小数 $0.375$は $0.375=0.25+0.125$より,2進法で表すと $0.\Hako'011'_{(2)}$となる。

\end{enumerate}%

\begin{Kaitou}%
\end{Kaitou}%
\vfill{}%

\newpage%
\item %
\openHakoKaiFile[301]
$1800$の正の約数の個数は $\Hako'36'$個で,
\openHakoKaiFile[302]
正の約数の総和は $\Hako'6045'$である。

\begin{Kaitou}%
\end{Kaitou}%
\vfill{}%

\item %
\resetcounter{equation}
$xy-2x+y-5=0\Houteishiki{}$は次のように変形できる。
\[
\openHakoKaiFile[401]
\Par{x+\Hako'1'}\!\Par{y-\Hako'2'}=\Hako'3'
\]

したがって $\maru{1}$を満たす,\namikasen{$0$以上の整数} $x$,$y$の組は,次の 2組である。
\[
\Cord{x}{y}=\retu{\openHakoKaiFile[402]\Cord{\Hako[解1x]'0'}{\Hako'5'},\openHakoKaiFile[403]\Cord{\Hako[解2x]'2'}{\Hako'3'}}
\]
\Hfill{\Kakko{ただし,$\refHako*{解1x}<\refHako*{解2x}$}}

\begin{Kaitou}%
\end{Kaitou}%
\vfill{}%

\item %
\openHakoKaiFile[501]
$\Dfrac{1}{7}$は小数で表すと,$\Hako'6'$桁の循環節をもつ。
\openHakoKaiFile[502]
したがって $\Dfrac{1}{7}$の小数第 300位の数は $\Hako'7'$で,%
\openHakoKaiFile[503]
小数第 2021位の数は $\Hako'5'$である。

\begin{Kaitou}%
\end{Kaitou}%
\vfill{}%

\end{Enumerate*}%

\lfoot{
\HaitenBox{101}{3}
\HaitenBox{102}{3}
\;
\HaitenBox{201}{2}
\HaitenBox{202}{2}
\HaitenBox{203}{2}
\;
}
\rfoot{
\HaitenBox{301}{3}
\HaitenBox{302}{3}
\,
\HaitenBox{401}{2}
\HaitenBox{402}{2}
\HaitenBox{403}{2}
\,
\HaitenBox{501}{2}
\HaitenBox{502}{2}
\HaitenBox{503}{2}
}
\end{document}

%%%%%%%% 次行から emathMy.sty
%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% emath リクエスト%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%\EMworkfiledir{/foo}%
\RequirePackage{emathP}%
\RequirePackage{emathMw}%
\RequirePackage{emathEy}%
\RequirePackage{itemtopmath}%
\RequirePackage{EMesvect}%
\RequirePackage{emkasen}%
%\RequirePackage{bekutorukata}%
\RequirePackage{pifont}%
%\RequirePackage{Cdots}%2019/05/03
\useperllib{bignCr}%2020/03/07
%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% 環境定義 %%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\delimiterfactor=800%
\delimitershortfall=5pt%
\def\@Labelenumi{\protect\fbox{\protect\makebox[1.2em][c]{\bfseries\ {\arabic{enumi}}\ }}}%
\def\@Labelenumii{(\arabic{enumii})\ }%
\def\@Labelenumiii{\small(\protect\makebox[0.8em][c]{\roman{enumiii}})}%

\@ifundefined{labelenumi}{\newcommand{\labelenumi}{{\preitem\large\@Labelenumi}}}{\renewcommand{\labelenumi}{{\preitem\large\@Labelenumi}}}%
%\@ifundefined{labelenumii}{\newcommand{\labelenumii}{{\preitem\large\@Labelenumii}}}{\renewcommand{\labelenumii}{{\preitem\large\@Labelenumii}}}%
\@ifundefined{labelenumii}{\newcommand{\labelenumii}{{\preitem\@Labelenumii}}}{\renewcommand{\labelenumii}{{\preitem\@Labelenumii}}}%
\@ifundefined{labelenumiii}{\newcommand{\labelenumiii}{{\preitem\large\@Labelenumiii}}}{\renewcommand{\labelenumiii}{{\preitem\large\@Labelenumiii}}}%
%\renewcommand{\labelenumii}{{\preitem\@Labelenumii}}%
%\renewcommand{\labelenumiii}{{\preitem\small\@Labelenumiii}}%
\let\theenumi\@Labelenumi%
\let\theenumii\@Labelenumii%
\let\theenumiii\@Labelenumiii%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% 環境変更 %%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\def\ChangeFontTo#1{\font\temp@font=#1 at \f@size pt\temp@font}%  
\def\ChallengeFont{\usefont{T1}{qpl}{b}{n}}
\def\TrainingFont{\usefont{T1}{qhv}{b}{n}}
\def\GetReadyFont{\usefont{T1}{cmss}{bx}{n}}
\def\MedianFont{\usefont{T1}{qtm}{b}{n}}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% 環境変更 (emath依存)%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\let\to\esto
\def\CapOn{\caprm\relax}
\def\CapOff{\caprm[o]\relax}
\def\ChangeUnitlength#1{%
\setlength{\unitlength}{#1}
\setlength{\xunitlength}{\unitlength}%%% \xunitlength=\unitlength
\setlength{\yunitlength}{\unitlength}%%% \yunitlength=\unitlength
}
\def\EMe{\scalebox{1.1}{\text{$e$}}}
\def\EMi{\Cnum{}{}{}}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% 1文字出力 \A に A %%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%\def\PutCh#1#2{% Put character の略
%\Put{\csname #1\endcsname}[#2]{#1}%
%}%
%\def\PutCH#1#2{% Put character の略
%\Put{\csname #1\endcsname}#2{#1}%
%}%
%\def\mitD{\mathit{D}}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% ベクトル矢印型 %%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%\bekutorukata<0.25>{fill}%
%\changeArrowHeadSize[15]{1.2}%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% 箱解答初期化 %%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%\def\Reset#1{%
%\ifnum#1=1\relax\else
%\def\HakoKaiFilenum{#1}
%\fi
%\hakosyokika
%\centermodetrue
%\openHakoKaiFile
%\resetcounter{equation}
%}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% 演算子等 %%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\let\namikasen\psnamikasen
\def\Uwave#1{\emkasen*<kasensyu=wave>{\text{${#1}$}}}
\def\Sqrt#1{\mbox{$\sqrt{\,#1\,}$}} 
\def\NSqrt#1#2{\mbox{$\sqrt[#1]{\,#2\,}$}} 
\def\Dfrac#1#2{\displaystyle{\frac{\raisebox{-1mm}{$\,#1\,$}}{\raisebox{1mm}{$\,#2\,$}}}} 
%\def\SIn#1#2{\sin^{#2}{#1}}
\def\Gauss#1{\left[\,{#1}\,\right]}
% 奥村先生の美文書入門から経験値で修正しました。 
\def\Senbun#1#2#3#4{% 2006/05/30 
\Sub{1}{#3}\@Ratioi%
\Sub{1}{#4}\@Ratioii%
\Bunten#1#2{#3}{\@Ratioi}\@SPoint%
\Bunten#2#1{#4}{\@Ratioii}\@EPoint%
\Drawlines{\@SPoint\@EPoint}%
%\xdef\@SPoint\@SPoint%
%\xdef\@EPoint\@EPoint%
}%
%\def\Vec#1{\overrightarrow{\mathstrut\,{#1}\,\,}} % 2006/07 変更
%\def\RVec#1{\overrightarrow{\,{\rm{#1}}\,\,}}     %
\def\VNaiseki#1#2{\Vec*{#1}\Cdot\Vec*{#2}}%
\def\SNaiseki#1#2#3#4{{#1}\times{#3}+{#2}\times{#4}}%平面ベクトルの成分の内積
\def\SNaisekiii#1#2#3#4#5#6{{#1}\times{#4}+{#2}\times{#5}+{#3}\times{#6}}%空間ベクトルの成分の内積
\def\FNaiseki#1#2{\Dfrac{\VNaiseki{#1}{#2}}{\VAbs*{#1}\VAbs*{#2}}}
%\def\VAbs#1{\ensuremath\EMabs{\Vec{#1}}}%
%\def\Vec#1{\bekutoru*{\mathstrut\,{#1}\,\,}} 
%\def\Vec#1{\bekutoru*{\mathstrut\,{#1}\,}} 
\def\RVec#1{\bekutoru*{\,{\rm{#1}}\,}} 
\def\Vec{\@ifstar{\let\if@smash\iftrue{}\@Vec}{\let\if@smash\iffalse\@Vec}}%
\def\@Vec#1{%
\if@smash{
\smash{\bekutoru*{\mathstrut\,{#1}\,}}
}
\else{
\bekutoru*{\mathstrut\,{#1}\,}
}
\fi
}
\def\VAbs{\@ifstar{\let\if@smash\iftrue{}\@VAbs}{\let\if@smash\iffalse\@VAbs}}%
\def\@VAbs#1{%
\if@smash{
{\smash{\ensuremath\EMabs{\Vec*{#1}}}}\mathstrut
}
\else{
{\ensuremath\EMabs{\Vec{#1}}}
}
\fi
}
\def\Cdot{\!\cdot\!} 
\def\Percent{\scalebox{0.8}{%}}
\def\Dlog#1#2{\log_{#1}{#2}}%
\def\Dif#1{{\Par{#1}}'}
\def\PDif#1{{\PPar{#1}}'}% 2020/04/25
\def\Dint#1#2#3#4{\strlen{#4}\@wkLen\ifnum\@wkLen=0{積分変数がないので計算できません}\else{\dint{#1}{#2}{#3}\,d{#4}}\fi}%
\def\txDint#1#2#3#4{\displaystyle{\txint_{#1}^{#2}{#3}\,d{#4}}}%
\def\Dlim#1{\displaystyle{\lim_{#1}}}%
\def\Dhlim#1#2{\ensuremath\displaystyle{\lim_{h\esto{#1}}}{#2}}%
\def\@Dnlim#1#2{\ensuremath\displaystyle{\lim_{n\esto{#1}}}{#2}}%
\def\Dnlim#1#2{
\ifx#1*\@Dnlim{\infty}{#2}
\else\@Dnlim{#1}{#2}
\fi%
}%
\def\@Dhlim#1#2{\ensuremath\displaystyle{\lim_{h\esto{#1}}}{#2}}%
\def\Dhlim#1#2{
\ifx#1*\@Dhlim{0}{#2}
\else\@Dhlim{#1}{#2}
\fi%
}%
\def\Dxlim#1#2{\ensuremath\displaystyle{\lim_{x\esto{#1}}}{#2}}%
\def\Dtlim#1#2{\ensuremath\displaystyle{\lim_{t\esto{#1}}}{#2}}%
\def\Dsum#1#2#3{\tretuwa{#1}{#2}{#3}}%
\def\Teisekibun#1#2#3{{\left[\,{#1}\,\right]}_{#2}^{#3}}%
\def\Leader#1{\cdotfill[#1]}%
\def\Tai{\@ifstar{\@Tai}{\mbox{$\,:\,$}}}%
\def\@Tai#1#2{{#1}\mbox{$\,:\,$}{#2}}
\def\TAI#1#2#3#4{\mbox{${#1}\Tai{#2}={#3}\Tai{#4}$}}
\def\Renpi#1{\RetuParam{\Tai{}}{#1}}
\def\Npower#1#2{{#1\mathstrut}^{#2}}
\def\Epower#1{{{\EMe}\mathstrut}^{#1}}
%\def\Perm#1#2{\ensuremath{{}_{#1}\mathrm{P}_{#2}}}
%\def\Combi#1#2{\ensuremath{{}_{#1}\mathrm{C}_{#2}}}
\def\Perm{\@ifstar{\let\if@Disp\iftrue{}\@Perm}{\let\if@Disp\iffalse\@Perm}}%
\def\@Perm#1#2{%
{\ensuremath{{}_{#1}\mathrm{P}_{#2}}
\if@Disp{
{}=\DispPerm{#1}{#2}%
{}=\AnsPerm{#1}{#2}%
}
\fi
}
}
\def\Combi{\@ifstar{\let\if@Disp\iftrue{}\@Combi}{\let\if@Disp\iffalse\@Combi}}%
\def\@Combi#1#2{%
{\ensuremath{{}_{#1}\mathrm{C}_{#2}}
\if@Disp{
{}=\DispCombi{#1}{#2}%
{}={}\AnsCombi{#1}{#2}
}
\fi
}
}
\def\Kakko#1{\inhibitglue({#1})\inhibitglue}%
\def\KuroKakko#1{\inhibitglue【{#1}】\inhibitglue}%
\def\KagiKakko#1{\inhibitglue〔{#1}〕\inhibitglue}%
\def\TKakko#1{\text{\Kakko{#1}}}% 201801/31 追加
\def\Because#1{\Par{\:\because\:{#1}}}
\def\Mod#1{\Par{\!\!\!\mod{#1}}}
\def\Par#1{\left(#1\right)}
\def\VPar#1{\left(\smash{#1}\right)}
\def\PPar#1{\left\{{#1}\right\}}
\def\CORD#1{\ensuremath{\Par{\retu{#1}}}}%
\def\Cord#1#2{\ensuremath{\Par{\,{#1}\,,\,{#2}\,}}}%
\def\Cordiii#1#2#3{\ensuremath{\Par{\,{#1}\,,\,{#2}\,,\,{#3}\,}}}%
\def\WaSqrt#1#2{\Sqrt{{{#1}\mathstrut}^{2}+{{#2}\mathstrut}^{2}}}
\def\MaruStar{\ensuremath%%%%%%%%%%% 2020/2/7
\raisebox{-0.2zh}{
\begin{zahyou*}[ul=0.5zw](-1.1,1.1)(-1.1,1.1){}%
\def\O{(0,0)}
\def\R{0.8}
\rtenretu*[\O]{A(\R,90);B(\R,162);C(\R,234);D(\R,306);E(\R,18)}
\Takakkei<linethickness=0.3pt,oval=0.2pt>{\A\C\E\B\D}
\En<linethickness=0.3pt>\O{1}
\end{zahyou*}
}
}
\def\MaruSnow{\Maru{\text{\ding{91}}}}% 2020/1/8 
\def\Snow{\text{\ding{91}}}% 2020/6/8
\def\LogiArrow#1{
\def\temp@param{#1}%
\def\temp@xx{ff}%
\def\temp@xo{ft}%
\def\temp@ox{tf}%
\def\temp@oo{tt}%
\ifx\temp@param\temp@xx{\:\leavevmode\raisebox{2pt}{\vtop{\baselineskip0ex \lineskip.25ex \ialign{##\crcr{{$\xrightarrow[]{\text{\:$\times$\:}}$}}\crcr{$\xleftarrow[\text{\:$\times$\:}]{}$}\crcr}}\:}}\fi%
\ifx\temp@param\temp@xo{\:\leavevmode\raisebox{2pt}{\vtop{\baselineskip0ex \lineskip.25ex \ialign{##\crcr{{$\xrightarrow[]{\text{\:$\times$\:}}$}}\crcr{$\xleftarrow[\text{\:○\:}]{}$}\crcr}}\:}}\fi%
\ifx\temp@param\temp@ox{\:\leavevmode\raisebox{2pt}{\vtop{\baselineskip0ex \lineskip.25ex \ialign{##\crcr{{$\xrightarrow[]{\text{\:○\:}}$}}\crcr{$\xleftarrow[\text{\:$\times$\:}]{}$}\crcr}}\:}}\fi%
\ifx\temp@param\temp@oo{\:\leavevmode\raisebox{2pt}{\vtop{\baselineskip0ex \lineskip.25ex \ialign{##\crcr{{$\xrightarrow[]{\text{\:○\:}}$}}\crcr{$\xleftarrow[\text{\:○\:}]{}$}\crcr}}\:}}\fi%
}
\def\SubsTable#1#2#3#4#5#6{%
\mbox{%
$%
\begin{array}{c|c@{\:\to\:}c}%
{#1}&{#2}&{#3}\\\hline%
{#4}&{#5}&{#6}%
\end{array}%
$%
}%
}
\def\Kukan#1#2#3#4{%
\def\temp@param{#1}%
\def\temp@ee{[]}%
\def\temp@en{[)}%
\def\temp@ne{(]}%
\def\temp@nn{()}%
\def\temp@EE{[[}%
\def\temp@EN{[(}%
\def\temp@NE{([}%
\def\temp@NN{((}%
\def\temp@empty{}%
\ifx\temp@param\temp@ee{\ensuremath{{#3}\leqq{#2}\leqq{#4}}}\fi%
\ifx\temp@param\temp@en{\ensuremath{{#3}\leqq{#2}<{#4}}}\fi%
\ifx\temp@param\temp@ne{\ensuremath{{#3}<{#2}\leqq{#4}}}\fi%
\ifx\temp@param\temp@nn{\ensuremath{{#3}<{#2}<{#4}}}\fi%
%%%
\ifx\temp@param\temp@EE{\ensuremath{{#2}\leqq{#3},\,{#4}\leqq{#2}}}\fi%
\ifx\temp@param\temp@EN{\ensuremath{{#2}\leqq{#3},\,{#4}<{#2}}}\fi%
\ifx\temp@param\temp@NE{\ensuremath{{#2}<{#3},\,{#4}\leqq{#2}}}\fi%
\ifx\temp@param\temp@NN{\ensuremath{{#2}<{#3},\,{#4}<{#2}}}\fi%
}
\def\BunP#1#2#3#4{%
\Dfrac{{#2}\!\times\!{}{#3}+{#1}\!\times\!{}{#4}}{{#1}+{#2}}%
}
\def\BunVec#1#2#3#4{%
\def\temp@parami{#1}%
\def\temp@paramii{#2}%
\def\temp@One{1}%
\Dfrac{\ifx\temp@paramii\temp@One{\relax}\else{#2}\fi{\Vec{#3}}+{\ifx\temp@parami\temp@One{\relax}\else{#1}\fi}{\Vec{#4}}}{{#1}+{#2}}%
}
\def\RetuTimes#1{%
\retu<retukugiri={\times}>{#1}%
}
\def\RetuParam#1#2{%
\retu<retukugiri={#1}>{#2}%
}%
\def\Houteishiki#1{\houteisiki(label=#1){}}%
% align環境内の \houteisiki{}
%% 2010 Summer %%
\def\DispPerm#1#2{%
\def\@本体{}%
\def\@数{#1}%
\Ifor*\Cnt{1}{#2}\Do{%
\edefappend\@本体{\@数}%
\ifnum\Cnt=#2\relax\else%
\edefappend\@本体{,}%
\fi%
\ISub\@数{1}\@数%
}%
\RetuParam{\!\times\!}{\@本体}%
}%
\def\DispCombi#1#2{%
\def\@分子本体{}%
\def\@分母本体{}%
\def\@分子数{#1}%
\def\@分母数{#2}%
\Ifor*\Cnt{1}{#2}\Do{%
\edefappend\@分子本体{\@分子数}%
\edefappend\@分母本体{\@分母数}%
\ifnum\Cnt=#2\relax\else%
\edefappend\@分子本体{,}%
\edefappend\@分母本体{,}%
\fi%
\ISub\@分子数{1}\@分子数%
\ISub\@分母数{1}\@分母数%
}%
\Bunsuu{\RetuParam{\!\times\!}{\@分子本体}}{\RetuParam{\!\times\!}{\@分母本体}}%
}%
\def\AnsPerm#1#2{%
\calcval[s]{bignPr(#1,#2)}\@tmp%
\@tmp%
}%
\def\AnsCombi#1#2{%
\calcval[s]{bignCr(#1,#2)}\@tmp%
\@tmp%
}%

\def\Koushiki{%%%%%%%%% 2010 7. 
\ding{45}%
\unitlength=1zw%
\begin{pszahyou*}[EPSclip=false](-1.5,1.5)(-0.5,0.5)%
\setlinewidth{2}%
\Takakkei<oval=1.2mm>{\LT\LB\RB\RT}%
\Put{(0,0)}[c]{\makebox[2.5zw][s]{\textbf{公式}}}%
\end{pszahyou*}%
}%
%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% その他 %%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\def\Ans#1{\ensuremath{{\color{red}{\bm{#1}}}}}
\def\TAns#1{\text{\textcolor{red}{\textbf{#1}}}}
\def\FboxThickness{1pt}%
%\def\Waku#1{%
%\EMfbox<framethickness=\FboxThickness>{\ensuremath$\bsityuu[0pt][0pt]\bm{#1}$}%
%}% 2020/04/25 delete
% TeXbook p.149 
\def\Hfill#1{{% 
\unskip\nobreak\hfil\penalty50 
\hskip2zw\hbox{}\nobreak\hfil{#1}\relax 
\parfillskip=\z@\finalhyphendemerits=0\par}} 
%
\def\FileName{\hfill{\tt{\jobname}}}
%\AtBeginDvi{\special{papersize=\the\paperwidth,\the\paperheight}} 
\def\ToNextPage{\hfill{}\Kakko{裏面に続く}}
\def\NoNextPage{\hfill{}\Kakko{裏面はありません}}
\def\ToNextPaper#1{\hfill{}\Kakko{{#1}~枚目に続く}}
\def\Yoshiki{\text{\Kakko{与式}}}
\def\Sahen{\text{\Kakko{左辺}}}
\def\Uhen{\text{\Kakko{右辺}}}
\def\Naraba{\quad{}ならば\quad{}}
%%%%%%%%%%%%%%%%%%%
%%% danger mark %%%
%%%%%%%%%%%%%%%%%%%
\font\manual=manfnt % font used for the METAFONT logo, etc. (new version)
\def\dbend{{\manual\char126}} % dangerous bend sign
\def\d@nger{\medbreak\begingroup\clubpenalty=10000
  \def\par{\endgraf\endgroup\medbreak} \noindent\hangindent3zw\hangafter=-2
  \hbox to0pt{\hskip-\hangindent\dbend\hfill}}
\outer\def\danger{\d@nger}
\def\enddanger{\endgraf\endgroup} % omits the \medbreak
\def\dd@nger{\medbreak\begingroup\clubpenalty=10000
  \def\par{\endgraf\endgroup\medbreak} \noindent\hangindent4zw\hangafter=-2
  \hbox to0pt{\hskip-\hangindent\dbend\kern1pt\dbend\hfill}}
\outer\def\ddanger{\dd@nger}
\def\endddanger{\endgraf\endgroup} % omits the \medbreak
\def\CM{\mbox{\texttt{cm}}}%
%%%%%%%%%%%%%%%%%%%
%%% uruby       %%%
%%%%%%%%%%%%%%%%%%%
%\makeatletter
%\providecommand{\rubyfamily}{}
%\def\kanjistrut{\vrule \@height0.88zw \@depth0.12zw \@width\z@}
%\newcommand\Uruby[3][0.2zw]{%
%\leavevmode
%\dimen1=#1\relax
%\dimen3=\f@size\p@
%\setbox1=\hbox{#2}%
%\setbox3=\hbox{\rubyfamily\fontsize{0.5\dimen3}{0pt}\selectfont #3}%
%\ifdim\dimen1=\z@
%        \ifdim\wd1>\wd3 \dimen1=\wd1 \else \dimen1=\wd3 \fi 
%\else
%        \ifdim\dimen1<\wd1
%                \dimen1=\wd1
%        \fi
%\fi
%\hbox to \dimen1{\kanjistrut\hfill\unhbox1\hfill}%
%\dimen4=\ht3 \advance\dimen4 \dp3 \advance\dimen4 #1\relax%
%\kern-\dimen1\raise-\dimen4\hbox{%
%        \kanjiskip=0pt plus 2fil
%        \xkanjiskip=0pt plus 2fil
%        \vbox{%
%                \hbox to \dimen1{\rubyfamily
%                        \fontsize{0.5\dimen3}{0pt}\selectfont \kanjistrut
%                        \ifdim\dimen1<\wd3
%                                \hss\unhbox3\hss
%                        \else
%                                \hfil\unhbox3\hfil
%                        \fi
%                }%
%        }\hskip\kanjiskip\relax
%}%
%}
%\makeatother
コメントを書く(引用) | スレッド一覧

CGIROOM