%
%	gbb60166@gmail.com	https://unilab.gbb60166.jp/prekou/prekou.htm
%
% aspectratio= は 1610, 169, 149, 54, 32 の中から選べる（省略時は 43）
% C:\texlive\2024\texmf-dist\tex\latex\beamer\beamer.cls
%\documentclass[20pt,dvipdfmx,usepdftitle=false,hyperref={pdfpagemode=FullScreen},aspectratio=169]{beamer}
%\documentclass[20pt,dvipdfmx,usepdftitle=false,hyperref={pdfstartview={XYZ null null 8.00}},aspectratio=169]{beamer}
\documentclass[20pt,dvipdfmx,usepdftitle=false,aspectratio=169]{beamer}
% pdfの栞の字化けを防ぐ
%\AtBeginDvi{\special{pdf:tounicode EUC-UCS2}}
% テーマ
\usetheme{Copenhagen}
% navi. symbolsは目立たないが，dvipdfmxを使うと機能しないので非表示に
\setbeamertemplate{navigation symbols}{} 
\usepackage{bxdpx-beamer,pxjahyper,minijs}
%\usepackage{graphicx}
%\usepackage{tkokugo,furikana,tsayusen,shiika,sfkanbun,jdkintou,plext}
\usepackage{type1cm}
\usepackage[deluxe]{otf}
%\usepackage{tikzsymbols}
%\usepackage[dvipdfmx]{graphicx}%
\def\pgfsysdriver{pgfsys-dvipdfmx.def}%（graphicxパッケージを使用しない場合はこの行を有効に）
%\def\pgfsysdriver{pgfsys-dvips.def}%デフォルト
%\usepackage[e]{esvect}
\usepackage{tikz}%（これで、pgfとpgfforが読み込まれます。）
%\usepackage{tikz-3dplot}
\usetikzlibrary{calc}
%\usetikzlibrary{arrows.meta,patterns,angles,intersections,backgrounds}
%\usepackage{animate}
%\usepackage{pgfplots}
%\pgfplotsset{compat=newest}
%\pgfplotsset{compat=newest, every axis/.append style={line width=1pt}}
%\PassOptionsToPackage{dvipdfmx}{graphicx}
\nofiles

\hypersetup{% Jul 18 2023
	pdftitle={プレ高数学科（LaTeX Beamer で汎用PDFプレゼンを作る）},
	pdfauthor={gbb60166@gmail.com},
	pdfsubject={https://unilab.gbb60166.jp/prekou/prekou.htm}
	}

% フォントはお好みで
%\usepackage{txfonts}

\mathversion{bold}
\renewcommand{\familydefault}{\sfdefault}
\renewcommand{\seriesdefault}{bx}
\renewcommand{\kanjifamilydefault}{\gtdefault}
\renewcommand{\kanjiseriesdefault}{bx}
\setbeamerfont{title}{size=\normalsize,series=\bfseries}
\setbeamerfont{frametitle}{size=\normalsize,series=\bfseries}
\setbeamertemplate{frametitle}[default][center]
\usefonttheme{professionalfonts}

% 参考にしたURL
% http://windom.phys.hirosaki-u.ac.jp/fswiki/wiki.cgi?page=LaTeX+Beamer%A4%C7%A5%D7%A5%EC%A5%BC%A5%F3%A5%C6%A1%BC%A5%B7%A5%E7%A5%F3

\newcommand{\Slash}[1]{\ooalign{\hfil\kern-3pt／\hfil\crcr$#1$}}
\everymath{\displaystyle}

\newcommand{\maruwaku}[1]{\begin{tikzpicture}[scale=0.7, baseline={([yshift=-22pt] current bounding box.north)}]
\filldraw[color=CUDBlue, line width=1pt, rounded corners=2pt] (-0.1,0)--(2.1,0)--(2.1,1.1)--(-0.1,1.1)--cycle;
\draw(1,0.5) node[white]{#1};
\end{tikzpicture}
}

\setbeamersize{text margin left=5mm,text margin right=5mm}
\fboxrule=0.8pt

\makeatletter
\newcommand{\hooklen}[2]{\settowidth{\@tempdima}{\(#1\)}
%\advance\@tempdima by.3ex
% ↑ 数式モードで式の前後に入るスペースを制御したかったが、
%    難しいのでやめた。段々難解なコードになっているのでやめた方がよい？
\hbox to\@tempdima{\hfil \(#2\)\hfil}}
%■等号付き不等号 by 美文書作成入門
\newcommand{\myleqq}{\mathrel{\mathpalette\gl@align<}}
\newcommand{\mygeqq}{\mathrel{\mathpalette\gl@align>}}
\newcommand{\gl@align}[2]{\lower.6ex\vbox{\baselineskip\z@skip\lineskip\z@
	\ialign{$\m@th#1\hfil##\hfil$\crcr#2\crcr=\crcr}}}
\makeatother

% カラーユニバーサルデザインを調べたつもりだがあまり自信がありません
% http://www.fukushihoken.metro.tokyo.jp/kiban/machizukuri/kanren/color.files/colorudguideline.pdf
% http://jfly.iam.u-tokyo.ac.jp/colorset/

% ■ アクセントカラー小面積を目立たせる高彩度色
\definecolor{CUDRed}{RGB}{255,75,0}
\definecolor{CUDGreen}{RGB}{3,175,122}
\definecolor{CUDBlue}{RGB}{0,90,255}
\definecolor{CUDCyan}{RGB}{77,196,255}
\definecolor{CUDMagenta}{RGB}{153,0,153}
\definecolor{CUDYellow}{RGB}{255,241,0}
\definecolor{CUDBrown}{RGB}{128,64,0}

\definecolor{CUDOrange}{RGB}{246,170,0}

% ■ ベースカラー広い面積の塗り分けに用いる低・中彩度色
\definecolor{CUDPink}{RGB}{255,202,191}
\definecolor{CUDBrightGreen}{RGB}{119,217,168}
\definecolor{CUDLime}{RGB}{216,242,85}
\definecolor{CUDCream}{RGB}{255,255,128}
\definecolor{CUDBrightCyan}{RGB}{191,228,255}
%\definecolor{CUD}{RGB}{}%

\setbeamercolor{CUDBrightGreen}{fg=black,bg=CUDBrightGreen!50}
\setbeamercolor{CUDBrightCyan}{fg=black,bg=CUDBrightCyan}
\setbeamercolor{CUDCream}{fg=black,bg=CUDCream!75}

%\setbeamercolor{frametitle}{use=structure,fg=white,bg=structure.fg}
%\setbeamercolor{palette primary}{use=structure,fg=white,bg=structure.fg}
%\setbeamercolor{frametitle}{bg=CUDOrange}
%\setbeamercolor{palette primary}{bg=CUDOrange}
%\setbeamercolor{frametitle}{bg=CUDCyan!25,fg=black}
%\setbeamercolor{palette primary}{bg=CUDCyan!25,fg=black}
%\setbeamercolor{frametitle}{bg=CUDCream!75,fg=black!80}
%\setbeamercolor{palette primary}{bg=CUDCream!75,fg=black!80}

\newcommand{\myfrac}[2]{\mathchoice%■ 修正 Oct 8,2023
	{%\fontsize{20}{20}\selectfont%	\displaystyle
		\frac{\raisebox{-.6ex}{\(#1\)}}{\raisebox{.4ex}{\(#2\)}}}%
	{\textstyle{\frac{#1}{#2}}}%	\textstyle
	{%\fontsize{13}{13}\selectfont%	\scriptstyle
		\frac{\raisebox{0ex}{\(#1\)}}{\raisebox{-.4ex}{\(#2\)}}}%
	{%\fontsize{11}{11}\selectfont%	\scriptscriptstyle
		\frac{\raisebox{0ex}{\(#1\)}}{\raisebox{-.4ex}{\(#2\)}}}%
	}

\begin{document}

\title{プレ高数学科}\author{gbb60166}

%■ 本文と数式モードの間に挿入される空白スペース
%\mathsurround=-1pt
%■ \( \log\log \)でlogとlogの間に挿入される細スペース（省略形は \,）
%\thinmuskip=3mu
%■ \( a+b \)で+の前後に挿入される中スペース（省略形は \>）
%\medmuskip=2mu plus 1mu minus 1mu
\medmuskip=1mu plus 1mu minus 1mu
%■ \( x=5 \)で=の前後に挿入される太スペース（省略形は \;）
%\thickmuskip=5mu plus 5mu
\thickmuskip=2mu plus 2mu
% mu は math units の省略で長さの単位

%■■■■■■■■■■■■■　テスト領域　■■■■■■■■■■■■■■




%\end{document}
%■■■■■■■■■■■■■　完成品　■■■■■■■■■■■■■■

\begin{frame}[t]
\frametitle{\( \sin,\ \cos,\ \tan \)は筆記体の書き順で覚える}

\vspace*{0.5zh}
\begin{minipage}{0.3\textwidth}
\begin{tikzpicture}[line width=1pt,>=stealth]% 筆記体を書く
\draw[line join=round](0.5,0)--(2.5,1.2)--(2.5,0)--cycle;
\draw(2.5,0)++(-0.2,0)--++(0,0.2)--++(0.2,0);
\draw[->,CUDRed,line width=3pt,line join=round]
	(0,0) .. controls (1,0.3) and (2,1)
	 .. (3,2) .. controls (3,0.5) and (3,-0.1) .. (2.4,0);
\end{tikzpicture}
\end{minipage}
\hfill
\begin{minipage}{0.3\textwidth}
\begin{tikzpicture}[line width=1pt,>=stealth]% 筆記体を書く
\draw[line join=round](0.5,0)--(2.5,1.2)--(2.5,0)--cycle;
\draw(2.5,0)++(-0.2,0)--++(0,0.2)--++(0.2,0);
\draw[->,CUDGreen,line width=3pt,line join=round]
	(3,1.5) ..controls (1,1.7) and (-0.2,0.5) .. (0,0)
	..controls (0.2,-0.5) and (2,-0.5) .. (3,-0.1);
\end{tikzpicture}
\end{minipage}
\hfill
\begin{minipage}{0.3\textwidth}
\begin{tikzpicture}[line width=1pt,>=stealth]% 筆記体を書く
\draw[line join=round](0.5,0)--(2.5,1.2)--(2.5,0)--cycle;
\draw(2.5,0)++(-0.2,0)--++(0,0.2)--++(0.2,0);
\draw[->,CUDBlue,line width=3pt,line join=round]
	(0,-0.2) ..controls (1,-0.2) and (3.2,-0.5) .. (3.2,0.3)
	..controls (3.2,0.7) and (3.2,1.5) .. (3.2,2);
\draw[<-,CUDBlue,line width=3pt,line join=round]
	(3.6,-0.2) ..controls (3.1,0) and (3.2,0.2) .. (3.2,1.9);
\draw[->,CUDBlue,line width=3pt] (2.8,1.5)--(3.7,1.5);
\end{tikzpicture}
\end{minipage}

\begin{minipage}{0.3\textwidth}
\[\textcolor{CUDRed}{\sf s}{\rm in}=\myfrac{\text{縦}}{\,\text{斜め}\,}\]
\end{minipage}
\hfill
\begin{minipage}{0.3\textwidth}
\[\textcolor{CUDGreen}{\sf c}{\rm os}=\myfrac{\text{横}}{\,\text{斜め}\,}\]
\end{minipage}
\hfill
\begin{minipage}{0.3\textwidth}
\[\textcolor{CUDBlue}{\sf t}{\rm an}=\myfrac{\text{縦}}{\,\text{横}\,}\]
\end{minipage}
\end{frame}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%


\begin{frame}[t]
\frametitle{\( \sin A,~\cos A,~\tan A \)の値を求めなさい }
\vspace*{-4ex}
\begin{tikzpicture}[rotate=113, very thick, scale=0.4,
	baseline=(current bounding box.north)]
%\draw[help lines] (0,0) grid (5,12);
\scriptsize
\coordinate [label=left:{$A$}] (A) at (5,12);
\coordinate [label=right:{$B$}] (B) at (0,0);
\coordinate [label=above:{$C$}] (C) at (5,0);
\begin{scope}
\clip(A)--(B)--(C)--cycle;
\fill[CUDRed] (A) circle (56pt);
\end{scope}
\draw[line join=round] (A)--(B)--(C)--cycle;
\draw (4,0)--(4,1)--(5,1);
\draw[semithick, dashed] (B) to[out=-30,in=210]
	node [solid, inner sep=1pt, fill=white]{$5$} (C);
\draw[semithick, dashed] (B) to[out=90,in=230]
	node [inner sep=2pt, fill=white]{$13$} (A);
\draw[semithick, dashed] (C) to[out=70,in=-70]
	node [inner sep=2pt, fill=white]{$12$} (A);
\visible<2->{\draw(5,6) node[CUDGreen,align=center]
	{\normalsize 正しい向きにする};}
\end{tikzpicture}
%\hfill
\pause
\begin{tikzpicture}[rotate=0, very thick, scale=0.4,
	baseline=(current bounding box.north)]
\scriptsize
\coordinate [label=left:{$A$}] (A) at (0,0);
\coordinate [label=right:{$B$}] (B) at (12,5);
\coordinate [label=below right:{$C$}] (C) at (12,0);
\begin{scope}
\clip(A)--(B)--(C)--cycle;
\fill[CUDRed] (A) circle (56pt);
\end{scope}
\draw[line join=round] (A)--(B)--(C)--cycle;
\draw[CUDRed, line width=3pt] (11,0)--(11,1)--(12,1);
\draw[semithick, dashed] (A) to[out=-20,in=200]
	node [solid, inner sep=1pt, fill=white]{$12$} (C);
\draw[semithick, dashed] (A) to[out=45,in=180]
	node [inner sep=2pt, fill=white]{$13$} (B);
\draw[semithick, dashed] (B) to[out=-45,in=45]
	node [inner sep=2pt, fill=white]{$5$} (C);
\end{tikzpicture}

\pause

\bigskip


{\footnotesize\( \sin A={\myfrac{\text{縦}}{\,\text{斜め}}} \pause
=\myfrac{5}{13} \)\quad\□答\hskip3zw\pause
\( \cos A={\myfrac{\text{横}}{\,\text{斜め}}} \pause
=\myfrac{12}{13} \)\quad\□答\pause \\

\bigskip
\( \tan A={\myfrac{\,\text{縦}\,}{\text{横}}} \pause
=\myfrac{5}{12} \)\quad\□答
}
\end{frame}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\begin{frame}[t]
\frametitle{\( \sin A,~\cos A,~\tan A \)の値を求めなさい }

\vspace*{-3.6ex}
\begin{tikzpicture}[rotate=-40, very thick, scale=1.5,
	baseline=(current bounding box.north)]
%\draw[help lines] (0,0) grid (2,2);
\footnotesize
\coordinate [label=right:{$A$}] (A) at ($ ({sqrt(5)},2) $);
\coordinate [label=left:{$B$}] (B) at (0,0);
\coordinate [label=below:{$C$}] (C) at ($ ({sqrt(5)},0) $);
\begin{scope}
\clip(A)--(B)--(C)--cycle;
\fill[CUDRed] (A) circle (12pt);
\end{scope}
\draw[line join=round] (A)--(B)--(C)--cycle;
\draw (C) ++(-0.2,0)-- ++(0,0.2) -- ++(0.2,0);
\draw[semithick, dashed] (B) to[out=-45,in=225]
	node [solid, inner sep=2pt, fill=white]{$\sqrt{5}$} (C);
\draw[semithick, dashed] (C) to[out=45,in=-45]
	node [inner sep=1pt, fill=white]{$2$} (A);
\draw[semithick, dashed] (B) to[out=80,in=190]
	node [inner sep=2pt, fill=white]{$3$} (A);
\visible<2->{\draw(1.2,0.7) node[CUDGreen,align=center]{正しい向きにする};}
\end{tikzpicture}
%\hfill
\pause
\begin{tikzpicture}[rotate=0, very thick, scale=1.5,
	baseline=(current bounding box.north)]
\footnotesize
\coordinate [label=left:{$A$}] (A) at (0,0);
\coordinate [label=right:{$B$}] (B) at ($ (2,{sqrt(5)}) $);
\coordinate [label=right:{$C$}] (C) at (2,0);
\begin{scope}
\clip(A)--(B)--(C)--cycle;
\fill[CUDRed] (A) circle (12pt);
\end{scope}
\draw[line join=round] (A)--(B)--(C)--cycle;
\draw[CUDRed, line width=3pt] (C) ++(-0.2,0)-- ++(0,0.2) -- ++(0.2,0);
\draw[semithick, dashed] (B) to[out=-45,in=45]
	node [solid, inner sep=2pt, fill=white]{$\sqrt{5}$} (C);
\draw[semithick, dashed] (C) to[out=225,in=-45]
	node [inner sep=1pt, fill=white]{$2$} (A);
\draw[semithick, dashed] (B) to[out=200,in=80]
	node [inner sep=2pt, fill=white]{$3$} (A);
\end{tikzpicture}
\pause

\vskip-1ex

{\footnotesize\( \sin A={\myfrac{\text{縦}}{\,\text{斜め}}} \pause
=\myfrac{\sqrt{5}}{3} \)\quad\□答\hskip3zw\pause
\( \cos A={\myfrac{\text{横}}{\,\text{斜め}}} \pause
=\myfrac{\,2\,}{3} \)\quad\□答\pause \\

\medskip

\( \tan A={\myfrac{\,\text{縦}\,}{\text{横}}} \pause
=\myfrac{\sqrt{5}}{2} \)\quad\□答
}
\end{frame}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\begin{frame}[t]
\frametitle{\( \sin A,~\cos A,~\tan A \)の値を求めなさい }
\vspace*{-4ex}
\begin{tikzpicture}[rotate=162, very thick, scale=0.2,
	baseline=(current bounding box.north)]
%\draw[help lines] (0,0) grid (20,7);
\scriptsize
\coordinate [label=left:{$A$}] (A) at (24,7);
\coordinate [label=right:{$B$}] (B) at (0,0);
\coordinate [label=above:{$C$}] (C) at (24,0);
\begin{scope}
\clip(A)--(B)--(C)--cycle;
\fill[CUDRed] (A) circle (56pt);
\end{scope}
\draw[line join=round] (A)--(B)--(C)--cycle;
\draw (C) ++(-2,0)-- ++(0,2) -- ++(2,0);
\draw[semithick, dashed] (C) to[out=45,in=-45]
	node [inner sep=1pt, fill=white]{$7$} (A);
\draw[semithick, dashed] (B) to[out=45,in=170]
	node [inner sep=1pt, fill=white]{$25$} (A);
\draw[semithick, dashed] (B) to[out=-20,in=200]
	node [inner sep=2pt, fill=white]{$24$} (C);
\visible<2->{\draw(13,0) node[CUDGreen,align=center]{正しい向きにする};}
\end{tikzpicture}
%\hfill
\pause
\begin{tikzpicture}[rotate=0, very thick, scale=0.2,
	baseline=(current bounding box.north)]
\scriptsize
\coordinate [label=left:{$A$}] (A) at (0,0);
\coordinate [label=right:{$B$}] (B) at (7,24);
\coordinate [label=right:{$C$}] (C) at (7,0);
\begin{scope}
\clip(A)--(B)--(C)--cycle;
\fill[CUDRed] (A) circle (56pt);
\end{scope}
\draw[line join=round] (A)--(B)--(C)--cycle;
\draw[CUDRed, line width=3pt] (C) ++(-2,0)-- ++(0,2) -- ++(2,0);
\draw[semithick, dashed] (C) to[out=225,in=-45]
	node [inner sep=1pt, fill=white]{$7$} (A);
\draw[semithick, dashed] (B) to[out=225,in=100]
	node [inner sep=2pt, fill=white]{$25$} (A);
\draw[semithick, dashed] (B) to[out=-60,in=60]
	node [inner sep=2pt, fill=white]{$24$} (C);
\end{tikzpicture}
\pause

\vskip-8ex
{\footnotesize\( \sin A={\myfrac{\text{縦}}{\,\text{斜め}}} \pause
=\myfrac{24}{25} \)\quad\□答\pause \\

\medskip
\( \cos A={\myfrac{\text{横}}{\text{斜め}}} \pause
=\myfrac{7}{25} \)\quad\□答\pause \\

\medskip
\( \tan A={\myfrac{\,\text{縦}\,}{\text{横}}} \pause
=\myfrac{24}{7} \)\quad\□答
}


\end{frame}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%





\end{document}

\textcolor{CUDRed}{

