\documentclass[10pt,a4paper]{article}
\usepackage[T1]{fontenc}
\usepackage[utf8]{inputenc}%ATTENTION codage en utf8 !
\usepackage{fourier}
\usepackage[scaled=0.875]{helvet}
\renewcommand{\ttdefault}{lmtt}
\usepackage{amsmath,amssymb,makeidx}
\usepackage[normalem]{ulem}
\usepackage{fancybox}
\usepackage{enumerate}
\usepackage{tabularx} 
\usepackage{dcolumn}
\usepackage{textcomp}
%\usepackage{xcolor}
\newcommand{\euro}{\eurologo{}}
%\usepackage{pstricks,pstricks-add}
\usepackage{pst-all}
\newcommand{\R}{\mathbb{R}}
\newcommand{\N}{\mathbb{N}}
\newcommand{\D}{\mathbb{D}}
\newcommand{\Z}{\mathbb{Z}}
\newcommand{\Q}{\mathbb{Q}}
\newcommand{\C}{\mathbb{C}}
%Tapuscrit : Denis Vergès
% Corrigé : François Hache
%%%%   Commandes perso FH
\newcommand{\ds}{\displaystyle}%   displaystyle
\newcommand{\cg}{\texttt{]}}%          crochet gauche
\newcommand{\cd}{\texttt{[}}%        crochet droit
\newcommand{\pg}{\geqslant}%      plus grand ou égal
\newcommand{\pp}{\leqslant}%      plus petit ou égal
%%%%
\usepackage[left=3cm, right=3cm, top=3cm, bottom=3cm]{geometry}
\newcommand{\vect}[1]{\mathchoice%
{\overrightarrow{\displaystyle\mathstrut#1\,\,}}%
{\overrightarrow{\textstyle\mathstrut#1\,\,}}%
{\overrightarrow{\scriptstyle\mathstrut#1\,\,}}%
{\overrightarrow{\scriptscriptstyle\mathstrut#1\,\,}}}
\renewcommand{\theenumi}{\textbf{\arabic{enumi}}}
\renewcommand{\labelenumi}{\textbf{\theenumi.}}
\renewcommand{\theenumii}{\textbf{\alph{enumii}}}
\renewcommand{\labelenumii}{\textbf{\theenumii.}}
\def\Oij{$\left(\text{O},~\vect{\imath},~\vect{\jmath}\right)$}
\def\Oijk{$\left(\text{O},~\vect{\imath},~ \vect{\jmath},~ \vect{k}\right)$}
\def\Ouv{$\left(\text{O},~\vect{u},~\vect{v}\right)$}
\usepackage{fancyhdr} 
\usepackage[frenchb]{babel}
\DecimalMathComma
\usepackage[np]{numprint}
\usepackage{graphicx}

\begin{document}
\setlength\parindent{0mm}
\rhead{A. P. M. E. P.}
\lhead{\small Baccalauréat de technicien}%tapez un titre
\lfoot{\small{Polynésie}}
\rfoot{\small{juin 2008}}
\renewcommand \footrulewidth{.2pt}%
\pagestyle{fancy}
\thispagestyle{empty}
\cfoot{\thepage}
\begin{center}{\Large \textbf{\decofourleft~Baccalauréat de technicien hôtellerie Polynésie~\decofourright\\juin 2008}}

\vspace{0,25cm}

Le candidat est invité à faire figurer sur la copie toute trace de recherche, même incomplète ou non fructueuse, qu'il aura développée.

L'annexe  devra être remise avec la copie.
\end{center}

\subsection*{\textsc{Exercice 1} \hfill 8 points}

\medskip
 
Le centre de thalassothérapie Neptune propose des formules de cure à la semaine. Trois choix de cures sont possibles :

\setlength\parindent{5mm}
\begin{itemize}
\item Cure 1 : détente et remise en forme, 
\item Cure 2 : minceur,
\item Cure 3 : tonus et vitalité.
\end{itemize}
\setlength\parindent{0mm}

\np{6000}~ clients ont fréquenté l'établissement durant l'année 2007.

On constate que :

\setlength\parindent{5mm} 
\begin{itemize}
\item[$\bullet~$] \np{2500} clients sont des hommes,
\item[$\bullet~$] 20\,\% des hommes ont choisi la cure 2,
\item[$\bullet~$] \np{1200} hommes ont choisi la cure 1,
\item[$\bullet~$] 3 clients sur 10 ont choisi la cure 3,
\item[$\bullet~$] 36\,\% des clients ont choisi la cure 2.
\end{itemize}
\setlength\parindent{0mm}

\begin{enumerate}
\item  Reproduire et compléter le tableau suivant qui couvre l'année 2007.

\begin{center}
\renewcommand{\arraystretch}{1.5}	
\begin{tabularx}{0.8\linewidth}{|*{5}{>{\centering \arraybackslash}X|}}\cline{2-5}
\multicolumn{1}{c|}{~}	&Cure 1&Cure 2&Cure 3& Total\\ \hline
Femmes					&840	&	&	&\\ \hline
Hommes					&		&	&	&\\ \hline
Total					&		&	&	&\np{6000}\\ \hline
\end{tabularx}
\end{center}

Dans toute la suite de l'exercice, les résultats seront arrondis à $10^{-2}$ si nécessaire.

\item On prélève une fiche au hasard parmi les \np{6000} fiches des clients ayant fréquenté l'établissement durant l'année 2007.

On considère que chaque fiche à la même probabilité d'être choisie.

\medskip

Calculer la probabilité de chacun des évènements suivants :

\setlength\parindent{5mm}
\begin{itemize}
\item[] $A$ : Le client a choisi la cure 1.
\item[] $B$ : Le client est un homme.
\item[] $C$ : Le client est une femme qui a choisi la cure 2
\end{itemize}
\setlength\parindent{0mm}

\item 
	\begin{enumerate}
		\item  Définir par une phrase l'évènement $A\cap B$ ; calculer la probabilité $P(A \cap B)$.
		\item  Définir par une phrase l'évènement $A\cup B$ ; calculer la probabilité $P(A\cup B)$.
		\item  Définir par une phrase l'évènement $\overline{A}$ ; calculer la probabilité $P\left(\overline{A}\right)$.
 	\end{enumerate}
\item	On a prélevé la fiche d'une femme. Calculer la probabilité que la cliente ait choisi la cure 3.
\end{enumerate}
 
\newpage

\subsection*{\textsc{Exercice 2} \hfill 12 points}
 
Les parties A, B et C sont indépendantes.

\medskip

Dans le but d'informer les personnes souhaitant se lancer dans les métiers de l'hôtellerie, la chambre de commerce et d'industrie de la région Nord-Pas de Calais a décidé de suivre pendant une période de deux ans l'évolution du bénéfice réalisé par un jeune restaurateur qui vient d'ouvrir son établissement.

\smallskip

Les résultats sont consignés, trimestre par trimestre, dans le tableau ci-dessous. Le nuage de points correspondant est donné en annexe.

\begin{center}
\begin{tabularx}{0.9\linewidth}{|c|*{2}{>{\centering \arraybackslash}X|}}\hline
Trimestre&	Rang du trimestre $x_{i}$&	Bénéfice en \euro{} $y_{i}$\\ \hline
janvier-février-mars 2006&	1&\np{1700}\\ \hline
avril-mai-juin 2006&	2&\np{1300}\\ \hline
juillet-août-septembre 2006&	3&\np{1000}\\ \hline
octobre-nov.-décembre 2006&	4&\np{1400}\\ \hline
janvier-février-mars 2007&	5&\np{1900}\\ \hline
avril-mai-juin 2007&	6&\np{2000}\\ \hline
juillet-août-septembre 2007&7&\np{2700}\\ \hline
octobre-nov.-décembre 2007&8&\np{3500}\\ \hline
\end{tabularx}
\end{center}

%\bigskip

\subsubsection*{Partie A : étude statistique et ajustement affine}

\begin{enumerate}
\item Un ajustement affine pour l'ensemble de ce nuage semble-t-il pertinent ?
\item 	Afin d'effectuer des prévisions, la chambre de commerce et d'industrie propose d'appliquer un ajustement affine en se limitant à l'intervalle [3~;~8].

Celui-ci est donné par la droite (d) d'équation $y =  471 x - 510$.

Tracer, dans le repère de l'annexe, la droite (d).
\item 	On suppose que ce modèle reste valable en 2008. Calculer le bénéfice prévisible pour le quatrième trimestre 2008 (octobre-novembre-décembre 2008).
\end{enumerate}

%\medskip

\subsubsection*{Partie B : étude d'une fonction}

On considère la fonction $f$ définie sur l'intervalle [1 ; 12] par
	\[f(x) =  800x+ \np{1000} - \np{2000}\ln x.\]
On nomme $\mathcal{C}$ la courbe représentative de $f$ dans le repère orthogonal de l'annexe.
\begin{enumerate}
\item  Déterminer $f'(x)$ où $f'$ désigne la fonction dérivée de $f$ et vérifier que $f'(x) = \dfrac{800x - \np{2000}}{x}$.
\item   
	\begin{enumerate}
		\item  Résoudre $f'(x) = 0$ pour $x$ appartenant à l'intervalle [1~;~12].
		\item  Étudier le signe de $f'(x)$ pour $x$ appartenant â l'intervalle [1~;~12].
		\item  Dresser le tableau de variations de $f$ sur l'intervalle [1~;~12].
 	\end{enumerate}
\item Reproduire et compléter le tableau ci-dessous. \emph{Les valeurs obtenues seront arrondies à la dizaine}.
	
%\medskip

\begin{center}
\renewcommand{\arraystretch}{1.5}	
	\begin{tabularx}{\linewidth}{|c|*{12}{>{\centering \arraybackslash}X|}}\hline
$x$		&1			&2	&3	&4	&5	&6	&7	&8	&9	&10	&11	&12\\ \hline
$f(x)$	&\np{1800}	&	&	&	&	&	&	&	&	&	&	&\\ \hline
\end{tabularx}
\end{center}

\item Tracer $\mathcal{C}$ sur l'annexe.

\end{enumerate}

%\medskip

\subsubsection*{Partie C : étude d'un autre modèle}

%\medskip

On admet que la fonction $f$ étudiée dans la partie B réalise, pour le restaurateur de la partie A, un bon ajustement du bénéfice en fonction du rang du trimestre jusqu'en 2008.

\medskip

Calculer, à l'aide de la fonction $f$, le bénéfice prévisible pour le quatrième trimestre 2008 (octobre-novembre-décembre 2008). \emph{Arrondir à la dizaine}.

\newpage

\subsubsection*{\centering ANNEXE À REMETTRE AVEC LA COPIE}

\vspace{1.5cm}

\begin{center}
\psset{xunit=1cm,yunit=0.002cm}
\begin{pspicture}(-1,0)(13,6500)
\psgrid[unit=1cm,subgriddiv=10,gridlabels=0,gridcolor=orange,subgridcolor=orange] (0,0)(0,0)(13,13)
\psaxes[linewidth=1.5pt,Dy=500]{->}(0,0)(13,6500)
%\multido{\n=0+0.1}{131}{\psline[linewidth=0.05pt](\n,0)(\n,6500)}
%\multido{\n=0+50}{131}{\psline[linewidth=0.05pt](0,\n)(13,\n)}
\psdots[dotstyle=+,dotangle=45,dotscale=2](1,1700)(2,1300)(3,1000)(4,1400)(5,1900)(6,2000)(7,2700)(8,3500)
\uput[d](13,0){$x$}\uput[l](0,6500){$y$}
%%%% question A.2.
%\psplot[linecolor=blue]{3}{12}{471 x mul 510 sub}
%%%% question B.4.
%\psplot[linecolor=red]{1}{12}{800 x mul 1000 add 2000 x ln mul sub}
\end{pspicture}
\end{center}
\end{document}