%
%	gbb60166@gmail.com	https://unilab.gbb60166.jp/prekou/prekou.htm
%
% aspectratio= は 1610, 169, 149, 54, 32 の中から選べる（省略時は 43）
% C:\texlive\2023\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,patterns}
%\usetikzlibrary{arrows.meta,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=0pt
%■ \( \log\log \)でlogとlogの間に挿入される細スペース（省略形は \,）
%\thinmuskip=3mu%■default
%■ \( a+b \)で+の前後に挿入される中スペース（省略形は \>）
%\medmuskip=4mu plus 2mu minus 4mu%■default
\medmuskip=1mu plus 1mu minus 1mu
%■ \( x=5 \)で=の前後に挿入される太スペース（省略形は \;）
%\thickmuskip=5mu plus 5mu%■default
\thickmuskip=3mu plus 2mu minus 2mu
% mu は math units の省略で長さの単位


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



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

\begin{frame}[t]
\frametitle{次の連立不等式を解きなさい
	\#$42$その$4${\small\ajKaku{1}\ \ajKakko{9}}}

\vskip-24pt
\[ \left\{\begin{array}{l}
	x^2-x-12<0 \\
	x^2-x-2\mygeqq 0
	\end{array}\right. \]
\pause

\medskip
\ajKakko{1}\hskip1zw $1$番目の不等式を解く

\bigskip
\ajKakko{2}\hskip1zw $2$番目の不等式を解く

\bigskip
\ajKakko{3}\hskip1zw $2$つの範囲が重なった部分が答え
\end{frame}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\begin{frame}[t]
\frametitle{次の連立不等式を解きなさい}

\vskip-10pt
まず$1$番目の不等式を計算する。\pause

\vskip-32pt
\begin{eqnarray*}
x^2-x-12 &<& 0 \\ \pause
(x+3)(x-4) &<& 0 \\ \pause
-3<x<4 & & \text{……\ajMaru{1}}
\end{eqnarray*}
\pause

%\vskip-12pt
\hspace*{4zw}
\begin{tikzpicture}[scale=2,thick, >=stealth]
%
%　■連立不等式の解の範囲
\coordinate (O) at (0,0);%	x軸 O------------->A
\coordinate (A) at (5,0);%	O<B<D<E<C<A
\coordinate (B) at (1.1,0);%	B<x<C
\coordinate (C) at (4,0);
\coordinate (D) at (1.9,0);%	D<x<E
\coordinate (E) at (3.1,0);

\scriptsize
%########## 領域Ｄ関係 #############
%\fill[pattern color=CUDBlue, pattern=north west lines]%
%	(D)--($ (D)+(0,0.6) $)--($ (O)+(0,0.6) $)--(O)--cycle;
%########## 領域Ｅ関係 #############
%\fill[pattern color=CUDBlue, pattern=north west lines]%
%	(E)--($ (E)+(0,0.6) $)--($ (A)+(0,0.6) $)--(A)--cycle;
%########## 領域Ｂ－Ｃ #############
\fill[pattern color=CUDRed, pattern=north east lines]%
	(B)--($ (B)+(0.2,0.4) $)--($ (C)+(-0.2,0.4) $)--(C)--cycle;
\draw[CUDRed](B)--($ (B)+(0.2,0.4) $)--($ (C)+(-0.2,0.4) $)--(C);
\filldraw[CUDRed,fill=white](B) circle (1.6pt);
\filldraw[CUDRed,fill=white](C) circle (1.6pt);
\draw(B) [yshift=-7pt] node{$-3$};
\draw(C) [yshift=-7pt] node{$4$};
\draw($(B)!.5!(C)$)+(0,0.4) node[inner sep=0pt, fill=white]{\ajMaru{1}};
%########## ｘ軸 #############
\draw[->](O)--(A);
\draw(5,-0.2) node{$x$};
%########## 領域Ｄ #############
%%%%%\fill[pattern color=CUDBlue, pattern=north west lines]%
%%%%%	(D)--($ (D)+(0,0.6) $)--($ (O)+(0,0.6) $)--(O)--cycle;
%\draw[CUDBlue](D)--($ (D)+(0,0.6) $)--($ (O)+(0,0.6) $);
%\fill[CUDBlue](D) circle (1.6pt);
%\draw(D) [yshift=-7pt] node{$-1$};
%\draw($(O)!.5!(D)$)+(0,0.6)
%	node[inner sep=0pt, fill=white]{\ajMaru{2}};
%########## 領域Ｅ #############
%%%%%\fill[pattern color=CUDBlue, pattern=north west lines]%
%%%%%	(E)--($ (E)+(0,0.6) $)--($ (A)+(0,0.6) $)--(A)--cycle;
%\draw[CUDBlue](E)--($ (E)+(0,0.6) $)--($ (A)+(0,0.6) $);
%\fill[CUDBlue](E) circle (1.6pt);
%\draw(E) [yshift=-7pt] node{$2$};
%\draw($(E)!.5!(A)$)+(0,0.6)
%	node[inner sep=0pt, fill=white]{\ajMaru{2}};
\end{tikzpicture}
\end{frame}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\begin{frame}[t]
\frametitle{次の連立不等式を解きなさい}

\vskip-10pt
次に$2$番目の不等式を計算する。\pause

\vskip-32pt
\begin{eqnarray*}
x^2-x-2 &\mygeqq& 0 \\ \pause
(x+1)(x-2) &\mygeqq& 0 \\ \pause
x\myleqq -1,~2\myleqq x & & \text{……\ajMaru{2}}
\end{eqnarray*}
\pause

\hspace*{4zw}
\begin{tikzpicture}[scale=2,thick, >=stealth]
%
%　■連立不等式の解の範囲
\coordinate (O) at (0,0);%	x軸 O------------->A
\coordinate (A) at (5,0);%	O<B<D<E<C<A
\coordinate (B) at (1.1,0);%	B<x<C
\coordinate (C) at (4,0);
\coordinate (D) at (1.9,0);%	D<x<E
\coordinate (E) at (3.1,0);

\scriptsize
%########## 領域Ｄ関係 #############
\fill[pattern color=CUDBlue, pattern=north west lines]%
	(D)--($ (D)+(0,0.6) $)--($ (O)+(0,0.6) $)--(O)--cycle;
%########## 領域Ｅ関係 #############
\fill[pattern color=CUDBlue, pattern=north west lines]%
	(E)--($ (E)+(0,0.6) $)--($ (A)+(0,0.6) $)--(A)--cycle;
%########## 領域Ｂ－Ｃ #############
%\fill[pattern color=CUDRed, pattern=north east lines]%
%	(B)--($ (B)+(0.2,0.4) $)--($ (C)+(-0.2,0.4) $)--(C)--cycle;
%\draw[CUDRed](B)--($ (B)+(0.2,0.4) $)--($ (C)+(-0.2,0.4) $)--(C);
%\filldraw[CUDRed,fill=white](B) circle (1.6pt);
%\filldraw[CUDRed,fill=white](C) circle (1.6pt);
%\draw(B) [yshift=-7pt] node{$-3$};
%\draw(C) [yshift=-7pt] node{$4$};
%\draw($(B)!.5!(C)$)+(0,0.4) node[inner sep=0pt, fill=white]{\ajMaru{1}};
%########## ｘ軸 #############
\draw[->](O)--(A);
\draw(5,-0.2) node{$x$};
%########## 領域Ｄ #############
%%%%%\fill[pattern color=CUDBlue, pattern=north west lines]%
%%%%%	(D)--($ (D)+(0,0.6) $)--($ (O)+(0,0.6) $)--(O)--cycle;
\draw[CUDBlue](D)--($ (D)+(0,0.6) $)--($ (O)+(0,0.6) $);
\fill[CUDBlue](D) circle (1.6pt);
\draw(D) [yshift=-7pt] node{$-1$};
\draw($(O)!.5!(D)$)+(0,0.6) node[inner sep=0pt, fill=white]{\ajMaru{2}};
%########## 領域Ｅ #############
%%%%%\fill[pattern color=CUDBlue, pattern=north west lines]%
%%%%%	(E)--($ (E)+(0,0.6) $)--($ (A)+(0,0.6) $)--(A)--cycle;
\draw[CUDBlue](E)--($ (E)+(0,0.6) $)--($ (A)+(0,0.6) $);
\fill[CUDBlue](E) circle (1.6pt);
\draw(E) [yshift=-7pt] node{$2$};
\draw($(E)!.5!(A)$)+(0,0.6) node[inner sep=0pt, fill=white]{\ajMaru{2}};
\end{tikzpicture}
\end{frame}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\begin{frame}[t]
\frametitle{次の連立不等式を解きなさい}

\vskip-10pt
\ajMaru{1}と\ajMaru{2}の両方に含まれる範囲は

%\pause
\bigskip
\hspace*{1zw}
\begin{tikzpicture}[scale=2.4,thick, >=stealth]
%
%　■連立不等式の解の範囲
\coordinate (O) at (0,0);%	x軸 O------------->A
\coordinate (A) at (5,0);%	O<B<D<E<C<A
\coordinate (B) at (1.1,0);%	B<x<C
\coordinate (C) at (4,0);
\coordinate (D) at (1.9,0);%	D<x<E
\coordinate (E) at (3.1,0);

\scriptsize

\visible<2->{\fill[CUDGreen](B)--($ (B)+(0.2,0.4) $)
		--($ (D)+(0,0.4) $)--(D)--cycle;
	\fill[CUDGreen](C)--($ (C)+(-0.2,0.4) $)
		--($ (E)+(0,0.4) $)--(E)--cycle;
	}
%########## 領域Ｄ関係 #############
\fill[pattern color=CUDBlue, pattern=north west lines]%
	(D)--($ (D)+(0,0.6) $)--($ (O)+(0,0.6) $)--(O)--cycle;
%########## 領域Ｅ関係 #############
\fill[pattern color=CUDBlue, pattern=north west lines]%
	(E)--($ (E)+(0,0.6) $)--($ (A)+(0,0.6) $)--(A)--cycle;
%########## 領域Ｂ－Ｃ #############
\fill[pattern color=CUDRed, pattern=north east lines]%
	(B)--($ (B)+(0.2,0.4) $)--($ (C)+(-0.2,0.4) $)--(C)--cycle;
\draw[CUDRed](B)--($ (B)+(0.2,0.4) $)--($ (C)+(-0.2,0.4) $)--(C);
\filldraw[CUDRed,fill=white](B) circle (1.6pt);
\filldraw[CUDRed,fill=white](C) circle (1.6pt);
\draw(B) [yshift=-7pt] node{$-3$};
\draw(C) [yshift=-7pt] node{$4$};
\draw($(B)!.5!(C)$)+(0,0.4) node[inner sep=0pt, fill=white]{\ajMaru{1}};
%########## ｘ軸 #############
\draw[->](O)--(A);
\draw(5,-0.2) node{$x$};
%########## 領域Ｄ #############
%%%%%\fill[pattern color=CUDBlue, pattern=north west lines]%
%%%%%	(D)--($ (D)+(0,0.6) $)--($ (O)+(0,0.6) $)--(O)--cycle;
\draw[CUDBlue](D)--($ (D)+(0,0.6) $)--($ (O)+(0,0.6) $);
\fill[CUDBlue](D) circle (1.6pt);
\draw(D) [yshift=-7pt] node{$-1$};
\draw($(O)!.5!(D)$)+(0,0.6) node[inner sep=0pt, fill=white]{\ajMaru{2}};
%########## 領域Ｅ #############
%%%%%\fill[pattern color=CUDBlue, pattern=north west lines]%
%%%%%	(E)--($ (E)+(0,0.6) $)--($ (A)+(0,0.6) $)--(A)--cycle;
\draw[CUDBlue](E)--($ (E)+(0,0.6) $)--($ (A)+(0,0.6) $);
\fill[CUDBlue](E) circle (1.6pt);
\draw(E) [yshift=-7pt] node{$2$};
\draw($(E)!.5!(A)$)+(0,0.6) node[inner sep=0pt, fill=white]{\ajMaru{2}};
\visible<2->{\draw[CUDGreen,very thick](B) circle (1.6pt);
	%\fill[CUDGreen](B)--($ (B)+(0.2,0.4) $)--($ (D)+(0,0.4) $)
	%	--(D)--cycle;
	\draw[CUDGreen, ultra thick]%
		($ (B)+(0.6pt,1.2pt) $)--($ (B)+(0.2,0.4) $)
			--($ (D)+(0,0.4) $)--(D);
	\fill[CUDGreen](D) circle (1.6pt);
	\draw[CUDGreen,very thick](C) circle (1.6pt);
	%\fill[CUDGreen](C)--($ (C)+(0.2,0.4) $)--($ (E)+(0,0.4) $)
	%	--(E)--cycle;
	\draw[CUDGreen, ultra thick]%
		($ (C)+(-0.6pt,1.2pt) $)--($ (C)+(-0.2,0.4) $)
		--($ (E)+(0,0.4) $)--(E);
	\fill[CUDGreen](E) circle (1.6pt);
	}
\end{tikzpicture}
\pause
\pause

%緑の部分が表す範囲を式で表すと\pause

\bigskip
\centerline{\□答\quad\( -3<x\myleqq -1,\quad 2\myleqq x< 4 \)}
\end{frame}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%




\end{document}

\textcolor{CUDRed}{

