\documentclass[12pt]{article}

 \usepackage{ifthen}

  \usepackage[utf8]{inputenc}
 % \usepackage{fourier}

  \usepackage[svgnames]{xcolor}
 \usepackage{variations}
  \usepackage{geometry}
  \geometry{a4paper,hmargin=1cm,vmargin=1cm}

  \setlength{\parindent}{0pt}

  \usepackage{graphicx}
  \usepackage{tabularx}
  \usepackage{ifpdf}
   \ifpdf
     \DeclareGraphicsRule{*}{mps}{*}{}
   \fi

  \usepackage{multicol}
  \setlength{\multicolsep}{12pt}
  \setlength{\columnsep}{40pt}
  \setlength{\columnseprule}{0pt}

  \usepackage{enumitem}
 % \setenumerate{align=left,leftmargin=*,noitemsep}
\setenumerate{align=left,leftmargin=*}
  \setenumerate[2]{label=\alph*),widest=a,ref=\theenumi.\alph*}
  \setitemize{nolistsep}

  \usepackage{amsmath,mathrsfs}
  \usepackage[np]{numprint}

  \usepackage[official,right]{eurosym}
  \usepackage[frenchb]{babel}
  \frenchbsetup{CompactItemize=false}
  \DecimalMathComma

\newcounter{exercice}
\newcounter{refex}
\renewcommand{\therefex}{\arabic{exercice}}
\newcounter{partie}[exercice]
\newcounter{refpart}
\renewcommand{\thepartie}{\Alph{partie}}
\renewcommand{\therefpart}{\Alph{partie}}

\makeatletter
\newenvironment{exercice}[1][]{%
		     \stepcounter{exercice}
		     \refstepcounter{refex}
		     \vspace{0.5em}
		     \par
                     \def\@svsechd{\large \color{white} \colorbox{purple}{\bfseries\arabic{exercice}}}%
                     \@xsect{-1em}%
                     \ifthenelse{\equal{#1}{}}{}{\textbf{#1}\par}%
                     }{\par\vspace{1.5em}}
\makeatother

\newenvironment{partie}[1][]{%
                     \stepcounter{partie}
                     \refstepcounter{refpart}
		      \par \vspace{0.5ex}\noindent
		     \textbf{Partie \thepartie \ifthenelse{\equal{#1}{}}{}{\quad -\quad#1}%
		     }\nopagebreak\par%
                     }{\par\vspace{1em}}



%%%%%%%%%%% Ensembles %%%%%%%%%%%%
\newcommand{\D}{\mathbb{D}}
\newcommand{\N}{\mathbb{N}}
\newcommand{\Q}{\mathbb{Q}}
\newcommand{\R}{\mathbb{R}}
\newcommand{\Z}{\mathbb{Z}}

%%%%%%%%%%% Intervalles %%%%%%%%%%%%
\newcommand{\intervalleOO}[2]{\left]{#1}\,{;}\,{#2}\right[}
\newcommand{\intervalleOF}[2]{\left]{#1}\,{;}\,{#2}\right]}
\newcommand{\intervalleFO}[2]{\left[{#1}\,{;}\,{#2}\right[}
\newcommand{\intervalleFF}[2]{\left[{#1}\,{;}\,{#2}\right]}

\newcommand{\couple}[2]{\left(#1\,{;}\,{#2}\right)}


\newcommand{\calc}{\mathscr{C}}
\newcommand{\cald}{\mathscr{D}}

%%%%%%%%%%%% Vecteurs %%%%%%%%%%%%%%%
\usepackage[e]{esvect}
\newcommand{\vect}[1]{\vv{#1}}
\newcommand{\repere}[3]{\left(#1\,{;}\,\vect{#2}{,}\,\vect{#3} \right)}
\newcommand{\oij}{\repere{O}{\imath}{\jmath}}
\newcommand{\barre}[1]{\overline{#1\rule{0.1em}{0ex}}}

%%%%%%%%%%%% Systèmes %%%%%%%%%%%%%%%
\newcommand{\sysd}[2]{%
       \left\{
       \begin{aligned}
          #1\\
          #2\\
       \end{aligned}
       \right.%
       }

\newcommand{\syst}[3]{%
       \left\{
       \begin{aligned}
          #1\\
          #2\\
	  #3
       \end{aligned}
       \right.%
       }

\newcommand{\sysq}[4]{%
       \left\{
       \begin{aligned}
          #1\\
          #2\\
	  #3
       \end{aligned}
       \right.%
       }




%%%%%%%%%%%% Divers %%%%%%%%%%%%%%%
\DeclareMathOperator{\card}{Card}


% perso nico

\newcommand{\orth}{\bot} % Pour faire le symbole perpendiculaire
\newcommand{\cm}{\,\mathrm{cm}} 
\newcommand{\pI}{{\ensuremath{+\infty}}} 
\newcommand{\mI}{{\ensuremath{-\infty}}} 

\newcommand{\cala}{\mathscr{A}}
\newcommand{\calb}{\mathscr{B}}
\newcommand{\calp}{\mathscr{P}}
\newcommand{\cale}{\mathscr{E}}
\newcommand{\calf}{\mathscr{F}}
\newcommand{\cals}{\mathscr{S}}
\newcommand{\calh}{\mathscr{H}}

% pour écrire des limites
\newcommand{\limite}[2]{\displaystyle\lim_{#1\rightarrow #2}}

\newcommand{\ssi}{\Longleftrightarrow} % Pour faire le symbole equivalent
\newcommand{\implique}{\Longrightarrow} % Pour faire le symbole implique

\usepackage{enumitem}
\usepackage{xypic}

  \usepackage{amsmath}
  \usepackage{amssymb}
  \usepackage{amsfonts}
  \usepackage{mathrsfs}
%  \usepackage{shortlst}


\usepackage{pstricks,pst-plot,pst-text,pst-tree,pst-eps,pst-fill,pst-node,pst-math}

\newtheorem{remarque}{Remarque}
\newtheorem{remarque*}{Remarque}
\newtheorem{theorem*}{Théorème}
\newtheorem{definition*}{Définition}


% --------------------------------------------------------------------------------------------------

%devoir surveillé personalisé
% #1 titre principal, #2 titre milieu haut en petit, #3 titre haut
% gauche, #4 titre haut droit 
\newcommand{\devpers}[4]{
                         %\pagestyle{empty} 
                         \noindent 
                         \begin{minipage}[t]{\linewidth}
                         \textit{#3 } \hfill \textit{ #2} \hfill \textit{#4}
                         \end{minipage}
                         \begin{center}{{\Large\bf #1 }} \end{center} 
                         \vspace{-0.3cm}
                         \rule{\linewidth}{0.5mm} 
                         }

\newcommand{\cp}[2]{%
        \begin{pmatrix}
        #1\\
        #2
        \end{pmatrix}%
        }



\newenvironment{exnormal}[1]{
                             \addtocounter{exercice}{1}
                             \vspace{1em} \par \noindent
                              {\bf Exercice \arabic{exercice}{\bf #1 } :}
                            }{\vspace{0.25em}}

\newcommand{\ds}{\displaystyle}
\usepackage{calc}

%-------------- extension professor desiree :
%\usepackage[xcas]{pro-tablor}

\newcommand{\exo}[2]{\begin{exnormal}{~#2}}
\newcommand{\finexo}{\end{exnormal}}


\RequirePackage{enumitem}
\setenumerate{align=left,leftmargin=*,noitemsep}
\setenumerate[2]{label=\alph*),widest=a,ref=\theenumi.\alph*}
\setitemize{nolistsep}

\newenvironment{colenumerate}[2][]%
               {\let\olditem\item
                \let\item\myitem
                \setcounter{c@lonne}{0}
                \setcounter{colg@uche}{1}
                \setcounter{ligh@ut}{1}
                \setcounter{nbc@l}{#2}
               \newcommand{\c@lenumfinitem}{\par\vspace{0.5\parsep}
                            \setcounter{c@litem}{\value{\@enumctr}}
                            \end{enumerate}\strut
                             \end{minipage}%
                             }
                \newcommand{\c@lenumdebitem}{\begin{minipage}[c]{\l@rgcol}
                             \addtocounter{c@litem}{1}
                             \strut\begin{enumerate}[#1,start=\value{c@litem}]
                            }
               \par
               \vspace{-\baselineskip}
               \setlength{\l@rgcol}{(\linewidth-\parindent)/#2}
               \noindent\begin{minipage}[c]{\l@rgcol}
               \strut\begin{enumerate}[#1]
               }%
               {\vspace{0.5\parsep}\end{enumerate}\strut
               \end{minipage}
               \par\vspace{-\baselineskip}
               }


%inserer une figure à droite du texte 
%\textfig{largeur en %}{echelle}figure}
\newsavebox{\maboite}
\newenvironment{textfig}[3]%
{\savebox{\maboite}{\begin{minipage}{\linewidth-#1\linewidth}
\begin{center}
\includegraphics[scale=#2]{#3}
\end{center}
\end{minipage}}
\begin{minipage}{#1\linewidth}}%
{\end{minipage} \usebox{\maboite}}

% \input{tabvar}
\pagestyle{empty} 

\begin{document}


\begin{center} \textbf{\large{Devoir nº6 - Suites - 1ère spé maths}}  \end{center}
\begin{center}  \large{16 fev 2023 - 1h}  \end{center}



\exo{}{(4 pts)}
\begin{enumerate}
\item $(u_n)$ est une suite arithm\'etique de premier terme $u_1$ et de raison $r$ telle que $u_{12}=25$ et $u_{20}=49$.\par
Exprimer $u_n$ en fonction de $n$ puis calculer $u_1+u_2+.......+u_{30}$.
\medskip

\item Calculer $1 + 2 + 4 + 8+16 \cdots + 16384 + 32768$ en  utilisant une suite g\'eom\'etrique,\par
dont on pr\'ecisera la raison et le premier terme.
\end{enumerate}
\finexo



\exo{}{(5 pts)} Un imprimeur fabrique des livres. Au mois de juillet 2011, il a imprimé 2341 livres. Il décide d'augmenter sa production de 123 livres par mois.\par
On note $u_1$ la production en juillet 2011, $u_2$ la production en août 2011, $u_3$ la production en septembre 2011, et ainsi de suite.
\begin{enumerate}
\item Donner les valeurs de $u_2$ et $u_3$. Quelle est la nature de la suite $(u_n)$ ?
\item \begin{enumerate}
       \item Déterminer l'expression de $u_n$ en fonction de $n$.
       \item Quel est le nombre de livres fabriqués en janvier 2012 ? En décembre 2012 ?
      \end{enumerate}
\item Calculer la production totale de livres en 2012.
\end{enumerate}
\finexo


\exo{}{(11 pts)} % Amérique du sud 27 sept 2022 J2
La population d'une espèce en voie de disparition est surveillée de près dans une réserve naturelle. Les conditions climatiques ainsi que le braconnage font que cette population diminue de 10\,\% chaque année. Afin de compenser ces pertes, on réintroduit dans la réserve $100$ individus à la fin de chaque année.

On souhaite étudier l'évolution de l'effectif de cette population au cours du temps. Pour cela, on modélise l'effectif de la population de l'espèce par la suite $\left(u_n\right)$ où $u_n$ représente l'effectif de la population au début de l'année $2020 + n$. 

On admet que pour tout entier naturel $n$,\: $u_n \geqslant 0$.

Au début de l'année 2020, la population étudiée compte \np{2000} individus, ainsi $u_0 = \np{2000}$.

\medskip

\begin{enumerate}
\item Justifier que la suite $\left(u_n\right)$ vérifie la relation de récurrence : $u_{n+1} = 0,9u_n + 100$.
\medskip
\item Calculer $u_1$ puis $u_2$.
\medskip
\item La suite $\left(u_n\right)$ est-elle arithmétique ? géométrique ? 
\medskip
\item On considère la suite $\left(v_n\right)$ définie pour tout entier naturel $n$ par $v_n = u_n - \np{1000}$.
	\begin{enumerate}
		\item Montrer que la suite $\left(v_n\right)$ est géométrique de raison $0,9$.
		\smallskip
		\item En déduire que, pour tout entier naturel $n$,\: $u_n = \np{1000} \left(1 + 0,9^n\right)$.
		\smallskip
		\item Quelle semble être la limite de la suite $\left(u_n\right)$ ? En donner une interprétation dans le contexte de cet exercice.
	\end{enumerate}
\medskip
\item On souhaite déterminer le nombre d'années nécessaires pour que l'effectif de la population passe en dessous d'un certain seuil $S$ (avec $S > \np{1000}$).
	\begin{enumerate}
		\item Déterminer le plus petit entier $n$ tel que $u_n \leqslant \np{1020}$.\\
        Justifier la réponse à l'aide de la calculatrice.
	\end{enumerate}
\begin{minipage}{0.58\linewidth}
	\begin{enumerate}[resume]
		\item Dans le programme Python ci-contre, la variable $n$ désigne le nombre d'années écoulées depuis 2020, la variable $u$ désigne l'effectif de la population.\\		
        Compléter ce programme afin qu'il retourne le nombre d'années nécessaires pour que l'effectif de la population passe en dessous du seuil $S$.
	\end{enumerate}

\end{minipage}\hfill
\begin{minipage}{0.38\linewidth}
\begin{tabular}{|c l|}\hline
1&\texttt{def population(S) :}\\
2&\quad \texttt{n=0}\\
3&\quad \texttt{u=2000}\\
4& \\
5&\quad \texttt{while \ldots\ldots} :\\
6&\quad \quad \texttt{u= \ldots}\\
7&\quad \quad \texttt{n = \ldots}\\
8&\quad \texttt{return \ldots}\\ \hline
\end{tabular}
\end{minipage}
\end{enumerate}

\finexo

\end{document}
