%  En préambule,  les  sources metapost.  Si  vous lancez  latex  sur ce  fichier,  il vous  placera
% automatiquement le fichier .mp dans le répertoire courant. 
\begin{filecontents*}{figsec.mp}
%input newcourbes;
%input couleur;
input geometriesyr16;
%input TEX;

verbatimtex
%&latex
\documentclass{article}
\usepackage[upright]{fourier}
\usepackage{preambule}
\begin{document}
etex

%beginfig(1);
  figuremainlevee(-1cm,-1cm,10cm,7cm);
  pair a,b,c,d,e,f,i,U,V,x;
  a:=origin;
  U:=(5cm,0);
  V:=(0,5cm);
  b:=a shifted U;
  d:=a shifted V;
  c:=b shifted V;
  i:=(a+b)/2;
  x:=a shifted (30cm,0);
  path C,cc;
  cc:=a--x;
  C:=cercles(i,c);
  %e:=intersectionpoint(C,cc);
  %draw arccercle(e,c,i) dashed evenly withcolor 0.6white withpen pencircle scaled 1.3bp;
  label.llft(btex A etex,a );
  label.bot(btex I etex,i );
  label.bot(btex B etex,b );
  label.top(btex C etex,c );
  label.ulft(btex D etex,d );
  draw polygone(a,b,c,d) withpen pencircle scaled 1.3bp;
  draw i--c withcolor 0.6white withpen pencircle scaled 1.3bp;

  
  e:= C intersectionpoint cc;
  draw arccercle(e,c,i) dashed evenly withcolor 0.6white withpen pencircle scaled 1.3bp;
  f:=e shifted V;
  draw chemin(b,e,f,c)withpen pencircle scaled 1.3bp;
label.urt(btex F etex,f );
  label.lrt(btex E etex,e );
  finmainlevee;
%endfig;





%%%%%%%%%%%%%%%%%%%
%%      L A     T Erre   Eratosthène 1
%%%%%%%%%%%%%%%%%%%%%%%%%%%

%%fig2

  figure(-8cm,-2cm,2cm,8cm);
    pair o,p,a,sp,sa,spm,sam,b,aa,pp;
    path C;

    o:=origin;
    C:=cercles(o,3cm);
    p:=pointarc(C,170);
    a:=pointarc(C,130);
    pp:=pointarc(C,200);
    aa:=pointarc(C,80);
    spm:=p shifted p;
    sp:=spm shifted p;
    sam:=a shifted p;
    sa:=sam shifted p;

    draw arccercle(aa,pp,o) withcolor 0.7white;
    dotlabel.lrt(btex P etex,p );
    dotlabel.top(btex A etex,a );
    dotlabel.lrt(btex Centre etex,o );
    
    drawarrow sp--spm withpen pencircle scaled 1.3bp withcolor green;
    drawarrow sa--sam withpen pencircle scaled 1.3bp withcolor green;
    draw sp--p withpen pencircle scaled 1.3bp withcolor green;
    draw sa--a withpen pencircle scaled 1.3bp withcolor green;
    draw p--o;
    draw a--o;

    b:=a shifted 0.3a;

    draw a--b withpen pencircle scaled 1.7bp;

    draw marqueangle(a,o,p,2);
    draw marqueangle(b,a,sa,2);
  fin;



%%%%%%%%%%%%%%%%%%%%%
  %
  %   Division de 37 par 4 sur un segment
  %
  %%%%%%%%%%%%%%%%%%%%%%%
  

  %%%%fig3

  figure(-1cm,-6cm,21cm,3cm);
  draw origin--(20cm,0);
  path b,bb,bbb;
  b:=(0,-1cm)--(0,1cm);
  bb:=(0,-.5cm)--(0,0.5cm);
  bbb:=(4cm,-0.25cm)--(4cm,0.25cm);

  for a:=0 upto 1  :
    draw b shifted (a*20cm,0) withpen pencircle scaled 1.7bp; 
  endfor;

  label.bot(btex 36 etex, (0,-1cm) );
  label.bot(btex 40 etex, (20cm,-1cm) );

  %draw bb shifted (5cm,0) withpen pencircle scaled 1.7bp withcolor blue;

  %label.bot(btex 37 etex, (5cm,-0.5cm) );

  %for a:=1 upto 9  :
  %  draw bb shifted (a*2cm,0) withpen pencircle scaled 1.3bp withcolor 0.5white; 
  %endfor;

  

   %for a:=1 upto 9  :
   % draw bbb shifted (a*.2cm,0) withpen pencircle scaled 1bp withcolor 0.9white; 
  %endfor;

   
  
  fin;




%%%%fig4

  figure(-1cm,-6cm,21cm,3cm);
  draw origin--(20cm,0);
  path b,bb,bbb;
  b:=(0,-1cm)--(0,1cm);
  bb:=(0,-.5cm)--(0,0.5cm);
  bbb:=(4cm,-0.25cm)--(4cm,0.25cm);

  for a:=0 upto 1  :
    draw b shifted (a*20cm,0) withpen pencircle scaled 1.7bp; 
  endfor;

  label.bot(btex 36 etex, (0,-1cm) );
  label.bot(btex 40 etex, (20cm,-1cm) );

  draw bb shifted (5cm,0) withpen pencircle scaled 1.7bp withcolor blue;

  label.bot(btex 37 etex, (5cm,-0.5cm) );

  %for a:=1 upto 9  :
  %  draw bb shifted (a*2cm,0) withpen pencircle scaled 1.3bp withcolor 0.5white; 
  %endfor;

  

   %for a:=1 upto 9  :
   % draw bbb shifted (a*.2cm,0) withpen pencircle scaled 1bp withcolor 0.9white; 
  %endfor;

   
  
  fin;
  






  %%%%fig5

  figure(-1cm,-6cm,21cm,3cm);
  draw origin--(20cm,0);
  path b,bb,bbb;
  b:=(0,-1cm)--(0,1cm);
  bb:=(0,-.5cm)--(0,0.5cm);
  bbb:=(4cm,-0.25cm)--(4cm,0.25cm);

  for a:=0 upto 1  :
    draw b shifted (a*20cm,0) withpen pencircle scaled 1.7bp; 
  endfor;

  label.bot(btex 36 etex, (0,-1cm) );
  label.bot(btex 40 etex, (20cm,-1cm) );

  draw bb shifted (5cm,0) withpen pencircle scaled 1.7bp withcolor blue;

  label.bot(btex 37 etex, (5cm,-0.5cm) );

  for a:=1 upto 9  :
    draw bb shifted (a*2cm,0) withpen pencircle scaled 1.3bp withcolor 0.5white; 
  endfor;

  

   %for a:=1 upto 9  :
   % draw bbb shifted (a*.2cm,0) withpen pencircle scaled 1bp withcolor 0.9white; 
  %endfor;

   
  
  fin;



%%%%fig6

  figure(-1cm,-6cm,21cm,3cm);
  draw origin--(20cm,0);
  path b,bb,bbb;
  b:=(0,-1cm)--(0,1cm);
  bb:=(0,-.5cm)--(0,0.5cm);
  bbb:=(4cm,-0.25cm)--(4cm,0.25cm);

  for a:=0 upto 1  :
    draw b shifted (a*20cm,0) withpen pencircle scaled 1.7bp; 
  endfor;

  label.bot(btex 36 etex, (0,-1cm) );
  label.bot(btex 40 etex, (20cm,-1cm) );

  draw bb shifted (5cm,0) withpen pencircle scaled 1.7bp withcolor blue;

  label.bot(btex 37 etex, (5cm,-0.5cm) );

  for a:=1 upto 9  :
    draw bb shifted (a*2cm,0) withpen pencircle scaled 1.3bp withcolor 0.5white; 
  endfor;

  

   for a:=1 upto 9  :
    draw bbb shifted (a*.2cm,0) withpen pencircle scaled 1bp withcolor 0.9white; 
  endfor;

   
  
  fin;



  
end
\end{filecontents*}





\documentclass[xcolor={hyperref,dvips,ps2pdf},dvips]{beamer} 
\usepackage[baw]{fvrb-ex}
\fvset{xrightmargin=0cm,gobble=2,formatcom=color{blue}}


\usepackage{xlop}

\graphicspath{{/home/moi/Photos/Tehessin/}{/home/moi/Figures/FigSeconde/}{/home/moi/Figures/FigSeconde/20078/}{/home/moi/Photos/Maths/}}


\usepackage{BeamerPolymaths}
\renewcommand\FancyVerbFormatLine[1]{\colorbox{green}{#1}}

\mode<presentation>
{
  \usetheme[secheader]{Madrid}
  % or ...Warsaw

  \setbeamercovered{highly dynamic}
  % or whatever (possibly just delete it)
}


\title[] % (optional, use only with long paper titles)
{Les Nombres}

\subtitle{}

\author[] % (optional, use only with lots of authors)
{Guillaume CONNAN }
% - Give the names in the same order as the appear in the paper.
% - Use the inst{?} command only if the authors have different
%   affiliation.

\institute{Lycée Jean PERRIN}% (optional, but mostly needed)


\date[2\textsuperscript{nde}8] % (optional, should be abbreviation of conference name)
{Septembre 2007}
% - Either use conference name or its abbreviation.
% - Not really informative to the audience, more for people (including
%   yourself) who are reading the slides online

\subject{}

\AtBeginSubsection[]
{
  \begin{frame}<beamer>
    \frametitle{Sommaire}
     
    \tableofcontents[currentsection,currentsubsection]
       
  \end{frame}
}


% If you wish to uncover everything in a step-wise fashion, uncomment
% the following command: 

\beamerdefaultoverlayspecification{<+->}


\begin{document}

\begin{frame}
  \titlepage
\end{frame}

\begin{frame}
  \frametitle{Sommaire}
  \tableofcontents
  % You might wish to add the option [pausesections]
\end{frame}


\section{Mesurons la Terre}

\begin{frame}
  \begin{center}
  \includegraphics{figsec.2}
\end{center}
\end{frame}

\section{À la découverte des nombres premiers}

\begin{frame}
\begin{center}
             \begin{tabularx}{\textwidth}{*{10}{|X}|}
	     \hline
             1&2&3&4&5&6&7&8&9&10\\
             \hline
             11&12&13&14&15&16&17&18&19&20\\
             \hline
             21&22&23&24&25&26&27&28&29&30\\
             \hline
             31&32&33&34&35&36&37&38&39&40\\
             \hline
             41&42&43&44&45&46&47&48&49&50\\
             \hline
             51&52&53&54&55&56&57&58&59&60\\
             \hline
             61&62&63&64&65&66&67&68&69&70\\
             \hline
             71&72&73&74&75&76&77&78&79&80\\
             \hline
             81&82&83&84&85&86&87&88&89&90\\
             \hline
             91&92&93&94&95&96&97&98&99&100\\
             \hline
             \end{tabularx}
             \end{center}
\end{frame}

\section{Divisons en dessinant}

\begin{frame}
  \begin{center}
\includegraphics{Nombres.1}
\end{center}

\end{frame}









\begin{frame}
  \begin{center}
\opdiv{37}{4}
\end{center}

\end{frame}


\begin{frame}
  \begin{center}
  \includegraphics[width=\textwidth]{figsec.3}
\end{center}
\end{frame}




\begin{frame}
  \begin{center}
  \includegraphics[width=\textwidth]{figsec.4}
\end{center}
\end{frame}



\begin{frame}
  \begin{center}
  \includegraphics[width=\textwidth]{figsec.5}
\end{center}
\end{frame}




\begin{frame}
  \begin{center}
  \includegraphics[width=\textwidth]{figsec.6}
\end{center}
\end{frame}







\section{Dessinons des racines}


\begin{frame}
\begin{center}
\includegraphics{Nombres.2}
\end{center}
\end{frame}




\section{Trinité}

\begin{frame}
  \begin{center}
{\textcolor{bleu_m}{ \LARGE\Industry\ \Industry\  \Industry\ \Industry\  \Industry\ \Industry\  \Industry\ \Industry\  \Industry\ \Industry\  \Industry\ \Industry\  \Industry\ \Industry\  \Industry\ \Industry\  \Industry\ \Industry\  \Industry\ \Industry\  \Industry\ \Industry\  \Industry\ \Industry\  \Industry\ \Industry\  \Industry\ \Industry\  \Industry\ \Industry\  \Industry\ \Industry\  \Industry\ \Industry\  \Industry\ \Industry\  \Industry\ \Industry\  \Industry\ \Industry\  \Industry\ \Industry\  \Industry\ \Industry\  \Industry\ \Industry\  \Industry\ \Industry\  \Industry\ \Industry\  \Industry\ \Industry\  \Industry\ \Industry\ \Industry\  \Industry\ \Industry\  \Industry\ \Industry\  \Industry\ \Industry }}
\end{center}
\end{frame}


\section{Développement décimal périodique}


\begin{frame}
  \begin{center}
\opdiv{13}{7}
\end{center}

\end{frame}
\section{Le nombre d'or...}

\subsection{\'Episode 1}





\begin{frame}
  
\begin{center}
  \includegraphics{figsec.1}\caption{Rectangle d'or}
\end{center}



\end{frame}


\subsection{Épisode 3~:~le compas d'or}

\begin{frame}
  \begin{center}
  \includegraphics[height=\textheight]{compasor.eps}
\end{center}
\end{frame}







\subsection{Épisode 4~:~Dali et la proportion dorée}

\begin{frame}
  
\begin{center}
  \includegraphics[height=\textheight]{dali.eps}
\end{center}

\end{frame}






\subsection{\'Episode 5~:~Rezé et le Nombre d'Or...}



\begin{frame}
  \begin{center}
    \includegraphics[height=\textheight]{modulor.eps}
  \end{center}
\end{frame}

\end{document}
%%% Local Variables: 
%%% mode: latex
%%% TeX-master: t
%%% End: 
