%
%	gbb60166@gmail.com	https://unilab.gbb60166.jp/prekou/prekou.htm
%
% aspectratio= は 1610, 169, 149, 54, 32 の中から選べる（省略時は 43）
% C:\texlive\2022\texmf-dist\tex\latex\beamer\beamer.cls
%\documentclass[20pt,dvipdfmx,hyperref={pdfpagemode=FullScreen},aspectratio=169]{beamer}
%\documentclass[20pt,dvipdfmx,hyperref={pdfstartview={XYZ null null 8.00}},aspectratio=169]{beamer}
\documentclass[20pt,dvipdfmx,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

% フォントはお好みで
%\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}

\def\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
\def\hooklen#1#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{CUDCream}{fg=black,bg=CUDCream!75}



\begin{document}

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

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

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



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

\begin{frame}[t]
\frametitle{等差数列
\alt<6->{\(\textcolor{CUDRed!90}{5},8,11,14,17,20,
	\textcolor{CUDGreen!75}{23}\)}{\(5,8,11,14,17,20,23\)}の和を求めよ
	}
\begin{tikzpicture}[>=stealth,
	baseline={([yshift=-24pt] current bounding box.north)}]
%\draw[help lines] (0,0) grid (15,6);

\visible<5->{\fill[CUDPink](4,2)--++(0.2,0)--++(0,0.6)--++(0.2,0)
		--++(0,0.6)--++(0.2,0)--++(0,0.6)--++(0.2,0)--++(0,0.6)
		--++(0.2,0)--++(0,0.6)--++(0.2,0)--++(0,0.6)--++(0.2,0)
		--++(0,1)--++(-1.4,0)--cycle;
	\foreach \y in {26,...,28}\draw(4,0.2*\y+1)--++(1.4,0);
	\foreach \x in {0,1,...,7}\draw(0.2*\x+4,6)--++(0,0.6);
	}
\visible<2->{\scriptsize
	\fill[CUDBrightGreen](4,1)--++(0,1)--++(0.2,0)--++(0,0.6)--++(0.2,0)
		--++(0,0.6)--++(0.2,0)--++(0,0.6)--++(0.2,0)--++(0,0.6)
		--++(0.2,0)--++(0,0.6)--++(0.2,0)--++(0,0.6)--++(0.2,0)
		--++(0,-4.6)--cycle;

	\foreach \y in {0,1,...,25}\draw(4,0.2*\y+1)--++(1.4,0);
	\foreach \y in {5,10,...,25}\draw[thick](4,0.2*\y+1)--++(1.4,0);
	\foreach \x in {0,1,...,7}\draw(0.2*\x+4,1)--++(0,5);

	
	\foreach \y in {5,10,...,25}\draw(3.5,0.2*\y+1) node{\(\y\)};
	\draw(4,0.5) node{\(0\)};
	\draw(5.4,0.5) node{\(7\)};
	}
\visible<3>{\fill[CUDPink](7,1)--++(0,1)--++(0.2,0)--++(0,0.6)--++(0.2,0)
		--++(0,0.6)--++(0.2,0)--++(0,0.6)--++(0.2,0)--++(0,0.6)
		--++(0.2,0)--++(0,0.6)--++(0.2,0)--++(0,0.6)--++(0.2,0)
		--++(0,-4.6)--cycle;
	}
\visible<4>{\fill[CUDPink](7,1)--++(0.2,0)--++(0,0.6)--++(0.2,0)--++(0,0.6)
		--++(0.2,0)--++(0,0.6)--++(0.2,0)--++(0,0.6)--++(0.2,0)
		--++(0,0.6)--++(0.2,0)--++(0,0.6)--++(0.2,0)--++(0,1)
		--++(-1.4,0)--cycle;
	}
\visible<6->{\footnotesize
	\draw[<->,CUDRed,thick](5.8,5.6)--++(0,1)
		node[midway, inner sep=2pt, fill=white]{$5$};
	\draw[<->,CUDGreen,thick](5.8,1)--++(0,4.6)
		node[midway, inner sep=2pt, fill=white]{$23$};
	\draw[<->,CUDBlue,thick](4,0.7)--++(1.4,0)
		node[midway,inner sep=2pt,fill=white]{$7$};
	}
\end{tikzpicture}
\hfill
\begin{minipage}[t]{0.6\textwidth}
\only<3>{コピーを作る}
\only<4>{逆さまにする}
\only<5>{積み重ねる}
\only<7->{全体は\( \textcolor{CUDBlue}{7}\!\times\!
	(\textcolor{CUDRed}{5}+\textcolor{CUDGreen}{23}) \)となる。\\[1ex]
	}
\only<8->{\(5+8+11+14+17+20+23\)は、この半分だから\\[1ex]}
\only<9->{\( \tfrac{\textcolor{CUDBlue}{7}\times
	(\textcolor{CUDRed}{5}+\textcolor{CUDGreen}{23})}{2}
	=\tfrac{\textcolor{CUDBlue}{7}\times28}{2}
	=\textcolor{CUDBlue}{7}\times14 \)\\[1ex]
	\text{}\hfill\( =98 \)\ \□答 となる。
	}
\end{minipage}
\end{frame}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\begin{frame}[t]
\frametitle{等差数列\(\textcolor{CUDRed!90}{5},8,11,14,17,20,
	\textcolor{CUDGreen!75}{23}\)の和を求めよ
	}
\vspace*{-1.2ex}
\hspace*{4zw}
\begin{tikzpicture}[>=stealth,
	baseline={([yshift=-24pt] current bounding box.north)}]
\draw[CUDBlue](5,0.5)
	node{\(\underbrace{\kern10zw}_{7\text{\footnotesize 個}}\)};
\end{tikzpicture}

\bigskip
\( \dfrac{\ \textcolor{CUDBlue}{7}\!\times\!
	(\textcolor{CUDRed}{5}+\textcolor{CUDGreen}{23})\ }{2} \)を
	公式化すると\\[1ex]

\centerline{%
\begin{minipage}[t]{0.6\textwidth}
\begin{beamercolorbox}[wd=\textwidth,ht=6ex,sep=4pt,shadow=true,
	rounded=true, center]{CUDCream}
\( \dfrac{\ \text{\textcolor{CUDBlue}{個数}}\!\times\!
	(\text{\textcolor{CUDRed}{最初}}
	+\text{\textcolor{CUDGreen}{最後}})\ }{2} \)
\end{beamercolorbox}
\end{minipage}
}
\end{frame}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%





\end{document}
