emath BBS

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

No.8100  Re:時計
発言者: tDB
発言日: 2009 04/27 19:26
発言元: ntchba074027.chba.nt.ftth.ppp.infoweb.ne.jp
下のリストを re8099.tex のファイル名で保存して
タイプセットした結果はどうなりますか。
ファイル名を変更したりしてはいけませんよ。

% --- re8099.tex --------------------------
\documentclass[14pt]{jsarticle}
\usepackage[dvipdfm]{graphicx}
\usepackage{emathP}
\usepackage{emathPp}
\usepackage[remake]{emathPs}
\usepackage{emathMw}
\usepackage{emathEy}
\usepackage{emathW}
\usepackage{emathWs}
\setlength{\topmargin}{0pt}
\iftombow
        \addtolength{\topmargin}{-1in}
\else
        \addtolength{\topmargin}{-1truein}
\fi
\setlength{\textheight}{37\baselineskip}
\addtolength{\textheight}{\topskip}
% --- tokei.tex -----------------------------------
\def\tokei#1#2{%
  \begin{pszahyou*}[ul=5mm](-4,4)(-4,4)
% 「時」の目盛り
    \Cfor{\edef\kaku{0}}{\kaku<361}{\IAdd\kaku{30}\kaku}\do{{%
      \kyokuTyoku(2.5,\kaku)\A
      \kyokuTyoku(3,\kaku)\B
      \Drawline{\A\B}%
    }}%
% 「分」の目盛り
%    \Cfor{\edef\kaku{0}}{\kaku<361}{\IAdd\kaku{6}\kaku}\do{{%
%      \kyokuTyoku(2.7,\kaku)\A
%      \kyokuTyoku(3,\kaku)\B
%      \Drawline{\A\B}%
%    }}%
% 1〜12 の文字
    \Cfor{\edef\kaku{90}\edef\mozi{12}}{\kaku<450}{\IAdd\kaku{30}\kaku\IAdd\mozi{-1}\mozi}\do{{%
      \kyokuTyoku(3.5,\kaku)\E\Put\E(0,0)[c]{\mozi}%
    }}%
% 長針
    \Mul{6}{#2}\tmp \Sub{90}\tmp\kakuL%     \kakuL=90-6*(#2)
    \kyokuTyoku(2.8,\kakuL)\E
    \setarrowsize{40}{100}{120}%
    \ArrowLine\O\E
% 短針
    \Mul{30}{#1}\kakuS \Mul{0.5}{#2}\tmp
    \Sub{90}\kakuS\kakuS \Sub\kakuS\tmp\kakuS% \kakuS=90-30*(#1)-0.5*(#2)
    \kyokuTyoku(2.1,\kakuS)\E
    \setarrowsize{30}{60}{60}%
    \ArrowLine\O\E
% 円周
    \En\O{3}
    \Kuromaru[3pt]\O
  \end{pszahyou*}
}

\begin{document}

\title{時こくと時間}
\author{}
\date{}
\maketitle

\tokei{10}{30}

\section{時刻を読みましょう}
\begin{enumerate}
\item 時刻を読みましょう
        \begin{edaenumerate}<retusuu=2,gyoukan=3zw>[(1)]
                \item
                \item
                \item
                \item
        \end{edaenumerate}
\item 時刻を表しましょう
        \begin{edaenumerate}<retusuu=2,gyoukan=2zw>[(1)]
                \item 8時20分
                \item 10時40分
                \item 2時10分
                \item 4時50分
        \end{edaenumerate}
\item 次の分を読みましょう
        \vspace{3zw}

        1時間は何分ですか。 1時間=
        \begin{rectbox}[rectboxwidth=3zw]
                \vspace{2zw}
        \end{rectbox}
        \hspace{1zw}分
\end{enumerate}
\section{時間を求めましょう}

        \begin{rectbox}
                6時40分から7時30分までの時間はいくらありますか。
        \end{rectbox}

\begin{enumerate}[(1)]
                \item 時計で考えましょう
\newpage
                \item 時間の線で考えましょう
                        {\setlength{\unitlength}{1truecm}
                        \begin{picture}(15,2)
                                \put(0,0){\line(1,0){15}}
                                \multiput(3,0)(6,0){15}{\line(0,1){0.7}}
                                \multiput(0,0)(1,0){16}{\line(0,1){0.5}}
                                \put(-0.3,0.6){30}
                                \put(0.7,0.6){40}
                                \put(1.7,0.6){50}
                                \put(2.7,0.8){6時}
                                \put(3.7,0.6){10}
                                \put(4.7,0.6){20}
                                \put(5.7,0.6){30}
                                \put(6.7,0.6){40}
                                \put(7.7,0.6){50}
                                \put(8.7,0.8){7時}
                                \put(9.7,0.6){10}
                                \put(10.7,0.6){20}
                                \put(11.7,0.6){30}
                                \put(12.7,0.6){40}
                                \put(13.7,0.6){50}
                                \put(14.7,0.8){8時}
                                \put(7,-3){\line(0,1){3}}
                                \put(9,-1){\line(0,1){1}}
                                \put(12,-3){\line(0,1){3}}
                                \put(7,-0.5){\vector(1,0){2}}
                                \put(9,-0.5){\vector(1,0){3}}
                                \put(7.2,-2.3){\framebox(1.5,1.5)}
                                \put(9,-2){分}
                                \put(10,-2.3){\framebox(1.5,1.5)}
                                \put(12,-2){分}
                                \thicklines
                                \put(7,-2.5){\vector(1,0){5}}
                                \put(9,-4.5){\framebox(1.5,1.5)}
                                \put(10.7,-4){分}
                                \put(7,-4){あわせて}
                        \end{picture}}
                        \vspace{8zw}
                        \begin{enumerate}[問題1]
                                \item 8時50分から9時10分までの時間はいくらですか。
                                        
                                        \hspace{5zw}
                                        \begin{rectbox}[rectboxwidth=3zw]
                                                \vspace{2zw}
                                        \end{rectbox}
                                        \hspace{1zw}分
                                \item 10時40分から11時30分までの時間はいくらですか。
                                        
                                        \hspace{5zw}
                                        \begin{rectbox}[rectboxwidth=3zw]
                                                \vspace{2zw}
                                        \end{rectbox}
                                        \hspace{1zw}分
                                \item 2時30分から3時20分までの時間はいくらですか。
                                        
                                        \hspace{5zw}
                                        \begin{rectbox}[rectboxwidth=3zw]
                                                \vspace{2zw}
                                        \end{rectbox}
                                        \hspace{1zw}分
                                \item 5時50分から6時30分までの時間はいくらですか。
                                        
                                        \hspace{5zw}
                                        \begin{rectbox}[rectboxwidth=3zw]
                                                \vspace{2zw}
                                        \end{rectbox}
                                        \hspace{1zw}分
                        \end{enumerate}        
        \end{enumerate}
\section{時刻を求めましょう}

        \begin{rectbox}
                7時40分から50分読書をしました。読書が終わったのは何時何分ですか
        \end{rectbox}
        
\begin{enumerate}[(1)]
                \item 時計で考えましょう
\newpage
                \item 時間の線で考えましょう
                
                        {\setlength{\unitlength}{1truecm}
                        \begin{picture}(15,2)
                                \put(0,0){\line(1,0){15}}
                                \multiput(3,0)(6,0){15}{\line(0,1){0.7}}
                                \multiput(0,0)(1,0){16}{\line(0,1){0.5}}
                                \put(-0.3,0.6){30}
                                \put(0.7,0.6){40}
                                \put(1.7,0.6){50}
                                \put(2.7,0.8){7時}
                                \put(3.7,0.6){10}
                                \put(4.7,0.6){20}
                                \put(5.7,0.6){30}
                                \put(6.7,0.6){40}
                                \put(7.7,0.6){50}
                                \put(8.7,0.8){8時}
                                \put(9.7,0.6){10}
                                \put(10.7,0.6){20}
                                \put(11.7,0.6){30}
                                \put(12.7,0.6){40}
                                \put(13.7,0.6){50}
                                \put(14.7,0.8){9時}
                                \put(7,-3){\line(0,1){3}}
                                \put(9,-1){\line(0,1){1}}
                                \put(12,-3){\line(0,1){3}}
                                \put(7,-0.5){\vector(1,0){2}}
                                \put(9,-0.5){\vector(1,0){3}}
                                \put(7.2,-2.3){\framebox(1.5,1.5)}
                                \put(9,-2){分}
                                \put(10,-2.3){\framebox(1.5,1.5)}
                                \put(12,-2){分}
                                \thicklines
                                \put(7,-2.5){\vector(1,0){5}}
                                \put(8,-3.5){全部で50分}
                        \end{picture}}
                        \vspace{8zw}
                        \begin{enumerate}[問題1]
                                \item 2時20分から50分後は何時何分ですか。
                                        
                                        \hspace{5zw}
                                        \begin{rectbox}[rectboxwidth=3zw]
                                                \vspace{2zw}
                                        \end{rectbox}
                                        \hspace{1zw}時
                                        \hspace{1zw}
                                        \begin{rectbox}[rectboxwidth=3zw]
                                                \vspace{2zw}
                                        \end{rectbox}
                                        \hspace{1zw}分
                                        
                                \item 4時30分から40分後は何時何分ですか。
                                        
                                        \hspace{5zw}
                                        \begin{rectbox}[rectboxwidth=3zw]
                                                \vspace{2zw}
                                        \end{rectbox}
                                        \hspace{1zw}時
                                        \hspace{1zw}
                                        \begin{rectbox}[rectboxwidth=3zw]
                                                \vspace{2zw}
                                        \end{rectbox}
                                        \hspace{1zw}分
                                \item 7時40分から30分後は何時何分ですか。
                                        
                                        \hspace{5zw}
                                        \begin{rectbox}[rectboxwidth=3zw]
                                                \vspace{2zw}
                                        \end{rectbox}
                                        \hspace{1zw}時
                                        \hspace{1zw}
                                        \begin{rectbox}[rectboxwidth=3zw]
                                                \vspace{2zw}
                                        \end{rectbox}
                                        \hspace{1zw}分
                                \item 9時50分から40分後は何時何分ですか。
                                        
                                        \hspace{5zw}
                                        \begin{rectbox}[rectboxwidth=3zw]
                                                \vspace{2zw}
                                        \end{rectbox}
                                        \hspace{1zw}時
                                        \hspace{1zw}
                                        \begin{rectbox}[rectboxwidth=3zw]
                                                \vspace{2zw}
                                        \end{rectbox}
                                        \hspace{1zw}分
                        \end{enumerate}        
        \end{enumerate}
\end{document}

▼関連発言

8095:時計 [少しだけemath] 04/27 15:18
 ├8096:Re:時計 [tDB] 04/27 16:36
 │└8097:Re[2]:時計 [少しだけemath] 04/27 16:59
 │ └8098:Re[3]:時計 [tDB] 04/27 17:44
 │  └8099:Re[4]:時計 [少しだけemath] 04/27 18:42
 └8100:Re:時計 [tDB] 04/27 19:26
  └8101:Re[2]:時計 [少しだけemath] 04/27 19:51
   └8102:Re[3]:時計 [tDB] 04/27 20:01
    └8103:Re[4]:時計 [少しだけemath] 04/27 20:18
     └8104:Re[5]:時計 [tDB] 04/27 20:22
      ├8105:Re[6]:時計 [少しだけemath] 04/27 20:26
      └8106:Re[6]:時計 [少しだけemath] 04/27 20:28<-last

Pass 保存


CGIROOM