\documentclass[11pt,a4paper,french]{article}
\usepackage[T1]{fontenc}
\usepackage[utf8]{inputenc}
\usepackage{fourier}
\usepackage[scaled=0.875]{helvet}
\renewcommand{\ttdefault}{lmtt}
\usepackage{makeidx}
\usepackage{amsmath,amssymb}
\usepackage{fancybox}
\usepackage[normalem]{ulem}
\usepackage{pifont}
\usepackage{lscape}
\usepackage{multicol}
\usepackage{mathrsfs}
\usepackage{tabularx}
\usepackage{multirow}
\usepackage{enumitem}
\usepackage{textcomp}
\newcommand{\euro}{\eurologo{}}
%Tapuscrit : François Kriegk
\usepackage{pst-plot,pst-tree,pstricks,pst-node,pst-text}
\usepackage{pst-eucl,pst-3dplot,pstricks-add}
\usepackage{esvect}
\newcommand{\R}{\mathbb{R}}
\newcommand{\N}{\mathbb{N}}
\newcommand{\D}{\mathbb{D}}
\newcommand{\Z}{\mathbb{Z}}
\newcommand{\Q}{\mathbb{Q}}
\newcommand{\C}{\mathbb{C}}
\usepackage[left=2.5cm, right=2.5cm, top=2cm, bottom=3cm]{geometry}
\headheight15 mm
\newcommand{\vect}[1]{\overrightarrow{\,\mathstrut#1\,}}
\newcommand{\vectt}[1]{\overrightarrow{\,\mathstrut\text{#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)$}
\newcommand{\e}{\text{e}}
\usepackage{fancyhdr}
%\usepackage[dvips]{hyperref}
%\hypersetup{%
	%	pdfauthor = {APMEP},
	%	pdfsubject = {Baccalauréat Spécialité},
	%	pdftitle = {Métropole Sujet 2, 12 septembre  2023},
	%	allbordercolors = white,
	%	pdfstartview=FitH}
\usepackage{babel}
\DecimalMathComma
\newcommand{\ds}{\displaystyle}
\usepackage[np]{numprint}
\usepackage{tikz}
\usepackage{pgfplots}

%\renewcommand\arraystretch{1.3}
%\frenchsetup{StandardLists=true}

\begin{document}

	\setlength\parindent{0mm}
	%\setlength\parskip{3pt}
	\marginpar{\rotatebox{90}{\textbf{A. P{}. M. E. P{}.}}}
	\rhead{\textbf{A. P{}. M. E. P{}.}}
	\lhead{\small Baccalauréat spécialité sujet 2}
	\lfoot{\small{Métropole et La Réunion}}
	\rfoot{\small{12 septembre 2023}}
	\pagestyle{fancy}
	\thispagestyle{empty}

	\begin{center}
		{\Large\bf\decofourleft~Baccalauréat Métropole et La Réunion -- 12 septembre 2023~\decofourright\\[7pt]  Sujet 2\\[7pt]
			ÉPREUVE D'ENSEIGNEMENT DE SPÉCIALITÉ}
	\end{center}

	\bigskip

	{\large \textbf{\textsc{Exercice 1} \hfill 5 points}}

	\medskip

La paratuberculose est une maladie digestive infectieuse qui touche les vaches. Elle est due à la présence d'une bactérie dans l'intestin de la vache.

On réalise une étude dans une région dont 0,4\,\% de la population de vaches est infectée.

Il existe un test qui met en évidence la réaction immunitaire de l'organisme infecté par la bactérie.

Le résultat de ce test peut être soit \og positif\fg{}, soit \og négatif\fg{}.

On choisit une vache au hasard dans la région.

Compte tenu des caractéristiques du test, on sait que :

\begin{itemize}
\item Si la vache est atteinte par l'infection, la probabilité que son test soit positif est de $0,992$ ;
\item Si la vache n'est pas atteinte par l'infection, la probabilité que son test soit négatif est de 0,984 .
\end{itemize}

On désigne par :
	\begin{itemize}
		\item $I$ l'évènement \og{}la vache est atteinte par l'infection\fg{} ;
		\item $T$ l'évènement \og{}la vache présente un test positif\fg{}.
	\end{itemize}

On note $\overline{I}$ l'évènement contraire de $I$ et $\overline{T}$ l'évènement contraire de $T$.

\medskip

\textbf{Les parties A et B sont indépendantes.}

\bigskip

\textbf{Partie A}
\smallskip

\begin{enumerate}
	\item Reproduire et compléter l'arbre pondéré ci-dessous modélisant la situation.

		\begin{center}
				%:-+-+-+- Engendré par : http://math.et.info.free.fr/TikZ/Arbre/
			% Racine à Gauche, développement vers la droite
			\begin{tikzpicture}[xscale=1,yscale=1]
				% Styles (MODIFIABLES)
				\tikzstyle{fleche}=[->,>=latex,thick]
				\tikzstyle{noeud}=[fill=white,circle,inner sep=2pt]
				\tikzstyle{feuille}=[fill=white,circle,inner sep=2pt]
				\tikzstyle{etiquette}=[midway,fill=white, inner xsep=3pt, inner ysep=1.5pt]
				% Dimensions (MODIFIABLES)
				\def\DistanceInterNiveaux{3}
				\def\DistanceInterFeuilles{1}
				% Dimensions calculées (NON MODIFIABLES)
				\def\NiveauA{(0)*\DistanceInterNiveaux}
				\def\NiveauB{(1)*\DistanceInterNiveaux}
				\def\NiveauC{(2)*\DistanceInterNiveaux}
				\def\InterFeuilles{(-1)*\DistanceInterFeuilles}
				% Noeuds (MODIFIABLES : Styles et Coefficients d'InterFeuilles)
				\node[noeud] (R) at ({\NiveauA},{(1.5)*\InterFeuilles}) {};
				\node[noeud] (Ra) at ({\NiveauB},{(0.5)*\InterFeuilles}) {$I$};
				\node[feuille] (Raa) at ({\NiveauC},{(0)*\InterFeuilles}) {$T$};
				\node[feuille] (Rab) at ({\NiveauC},{(1)*\InterFeuilles}) {$\overline{T}$};
				\node[noeud] (Rb) at ({\NiveauB},{(2.5)*\InterFeuilles}) {$\overline{I}$};
				\node[feuille] (Rba) at ({\NiveauC},{(2)*\InterFeuilles}) {$T$};
				\node[feuille] (Rbb) at ({\NiveauC},{(3)*\InterFeuilles}) {$\overline{T}$};
				% Arcs (MODIFIABLES : Styles)
				\draw[fleche] (R.east)--(Ra.west) node[etiquette] {$0,004$};
				\draw[fleche] (Ra.east)--(Raa.west) node[etiquette] {$\dots$};
				\draw[fleche] (Ra.east)--(Rab.west) node[etiquette] {$\dots$};
				\draw[fleche] (R.east)--(Rb.west) node[etiquette] {$\dots$};
				\draw[fleche] (Rb.east)--(Rba.west) node[etiquette] {$\dots$};
				\draw[fleche] (Rb.east)--(Rbb.west) node[etiquette] {$\dots$};
			\end{tikzpicture}
			%:-+-+-+-+- Fin
		\end{center}

	\item \begin{enumerate}
		\item Calculer la probabilité que la vache ne soit pas atteinte par l'infection et que son test soit négatif. On donnera le résultat à $10^{-3}$ près.

		\item Montrer que la probabilité, à $10^{-3}$ près, que la vache présente un test positif est environ égale à 0,020.

		\item La \og{}valeur prédictive positive du test\fg{} est la probabilité que la vache soit atteinte par l'infection sachant que son test est positif. Calculer la valeur prédictive positive de ce test. On donnera le résultat à $10^{-3}$ près.

		\item Le test donne une information erronée sur l'état de santé de la vache lorsque la vache n'est pas infectée et présente un résultat positif au test ou lorsque la vache est infectée et présente un résultat négatif au test.

		Calculer la probabilité que ce test donne une information erronée sur l'état de santé de la vache. On donnera un résultat à $10^{-3}$ près.
	\end{enumerate}
\end{enumerate}

\newpage

\textbf{Partie B}

\smallskip

\begin{enumerate}
\setcounter{enumi}{2}
	\item Lorsqu'on choisit au hasard dans la région un échantillon de 100 vaches, on assimile ce choix à un tirage avec remise.

	On rappelle que, pour une vache choisie au hasard dans la région, la probabilité que le test soit positif est égale à 0,02.

	On note $X$ la variable aléatoire qui à un échantillon de 100 vaches de la région choisies au hasard associe le nombre de vaches présentant un test positif dans cet échantillon.

	\begin{enumerate}
		\item Quelle est la loi de probabilité suivie par la variable aléatoire $X$ ? Justifier la réponse et préciser les paramètres de cette loi.

		\item Calculer la probabilité que dans un échantillon de 100 vaches, il y ait exactement 3 vaches présentant un test positif. On donnera un résultat à $10^{-3}$ près.

		\item Calculer la probabilité que dans un échantillon de 100 vaches, il y ait au plus 3 vaches présentant un test positif. On donnera un résultat à $10^{-3}$ près.
	\end{enumerate}

	\item On choisit à présent un échantillon de $n$ vaches dans cette région, $n$ étant un entier naturel non nul. On admet que l'on peut assimiler ce choix à un tirage avec remise.

	Déterminer la valeur minimale de $n$ pour que la probabilité qu'il y ait, dans l'échantillon, au moins une vache testée positive, soit supérieure ou égale à 0,99.
\end{enumerate}

\vspace{1cm}

	{\large \textbf{\textsc{Exercice 2} \hfill  5 points}}

\medskip

On considère la fonction $f$ définie sur l'intervalle $] 0~;~+\infty[$ par 
\[f(x) = (2-\ln x) \times \ln x,\]

où $\ln$ désigne la fonction logarithme népérien.

On admet que la fonction $f$ est deux fois dérivable sur $]0~;~+\infty[$.

On note $C$ la courbe représentative de la fonction $f$ dans un repère orthogonal et $C'$ la courbe représentative de la fonction $f'$, fonction dérivée de la fonction $f$.

La \textbf{courbe} $\boldsymbol{C}'$ est donnée ci-dessous ainsi que son unique tangente horizontale (T).

\begin{center}
\begin{tikzpicture}[x=6.35mm,y=35mm]
%	\begin{axis}[x={6.35mm},y={35mm}, xmin=-0.5, xmax=17.5, ymin=-0.39, ymax=2.19, xtick distance=1,ytick distance=0.2, tick label style={/pgf/number format/set decimal separator={,},font=\footnotesize},  grid = major, axis lines=center]
%		\addplot [domain=0.9:17.5, smooth, samples=60,line width=1pt,red]{2*(1-ln(x))/x}; % Équation analytique
%		\node[below left] at(0,0) {O};
%		\node at(1.5,5.3) {$C'$};
%		\node[below left] at(0,0) {O};
%	\end{axis}
	\draw [color = gray!75, line width = 0.5pt, xstep=1, ystep = 0.2,dashed] (0,-0.39) grid (17.5,2.19);
\draw[->] (-0.5,0) -- (17.5,0);
\foreach \x in {1,...,17}
\draw[shift={(\x,0)},color=black] (0pt,2pt) -- (0pt,-2pt) node[below, fill = white] {\footnotesize $\np{\x}$};
\draw[->] (0,-0.39) -- (0,2.19);
\foreach \y in {-0.2,0.2,0.4,0.6,0.8,1,1.2,1.4,1.6,1.8,2}
\draw[shift={(0,\y)},color=black] (2pt,0pt) -- (-2pt,0pt) node[left, fill = white] {\footnotesize $\np{\y}$};
\draw[color=black] (-2pt,-2pt) node[below left] {O};
\clip (0,2.2) rectangle (17.5,-0.4);
\draw[line width=1pt,color=red,smooth,samples=100,domain= 0.8:17.5 ] plot(\x,{2*(1 - ln(\x))/\x} );
\node[red] at(1.65,1.3){$C'$};
\draw[teal,line width=1pt] (-0.5,-0.2707)--(17.5,-0.2707) ;
\draw[teal,line width=1pt,dashed] (7.3891,-0.2707)--(7.3891,0) ;
\node[teal] at(0.8,-0.35)  {(T)};
\draw[fill=white,draw=gray,line width=1pt] (3,1.4)rectangle(16,2); \node[text width=8.2cm,align=center] at (9.75,1.7){On rappelle que \textbf{cette courbe $C'$ est la courbe représentative de la fonction dérivée $f'$}} ;
\end{tikzpicture}
\end{center}

\newpage

\begin{enumerate}
	\item Par lecture graphique, avec la précision que permet le tracé ci-dessus, donner :

	\begin{enumerate}
		\item le coefficient directeur de la tangente à $C$ au point d'abscisse 1.

		\item 	le plus grand intervalle sur lequel la fonction $f$ est convexe.
	\end{enumerate}

	\item \begin{enumerate}
		\item Calculer la limite de la fonction $f$ en $+\infty$.

		\item Calculer $\lim\limits_{x \to 0} f(x)$. Interpréter graphiquement ce résultat.
	\end{enumerate}

	\item Montrer que la courbe $C$ coupe l'axe des abscisses en deux points exactement dont on précisera les coordonnées.

	\item \begin{enumerate}
		\item Montrer que pour tout réel $x$ appartenant à $]0~;~+\infty[, \quad f'(x) = \dfrac{2(1-\ln x)}{x}$.

		\item En déduire, en justifiant, le tableau de variations de la fonction $f$ sur $]0~;~+\infty[$.
	\end{enumerate}

	\item On note $f''$ la dérivée seconde de $f$ et on admet que pour tout réel $x$ appartenant à $]0~;~+\infty[$, $f''(x) = \dfrac{2(\ln x-2)}{x^{2}}$.

Déterminer par le calcul le plus grand intervalle sur lequel la fonction $f$ est convexe et préciser les coordonnées du point d'inflexion de la courbe $C$.
\end{enumerate}

\vspace{1cm}
	{\large \textbf{\textsc{Exercice 3} \hfill 5 points}}

\medskip

On considère la suite $\left(u_{n}\right)$ définie par: $\left\{\begin{array}{l c l}
u_{1}&=&\dfrac{1}{\e} \\
u_{n+1}&=&\dfrac{1}{\e}\left(1+\dfrac{1}{n}\right) u_{n}\: \text {pour tout entier } n \geqslant 1.\end{array}\right.$

\begin{enumerate}
	\item Calculer les valeurs exactes de $u_{2}$ et $u_{3}$. On détaillera les calculs.

	\item On considère une fonction écrite en langage Python qui, pour un entier naturel $n$ donné, affiche le terme $u_{n}$. Compléter les lignes $L_{2}$ et $L_{4}$ de ce programme.

	\begin{center}
		\begin{tabular}{|c|>{\ttfamily}l|}
			\hline
			$L_{1}$ & def suite(n): \\
			$L_{2}$ & ~~\ldots \ldots \ldots \ldots \ldots \ldots \\
			$L_{3}$ & ~~for i in range(1, n): \\
			$L_{4}$ & ~~~~u=\ldots \ldots \ldots \ldots \ldots \ldots\\
			$L_{5}$ & return u \\
			\hline
		\end{tabular}
	\end{center}

	\item On admet que tous les termes de la suite $\left(u_{n}\right)$ sont strictement positifs.
	\begin{enumerate}
		\item Montrer que pour tout entier naturel $n$ non nul, on a : $1+\dfrac{1}{n} \leqslant \e$.

		\item En déduire que la suite $\left(u_{n}\right)$ est décroissante.
		\item La suite $\left(u_{n}\right)$ est-elle convergente ? Justifier votre réponse.
	\end{enumerate}

	\item \begin{enumerate}
		\item Montrer par récurrence que pour tout entier naturel non nul, on a : \quad $u_{n}=\dfrac{n}{\e^{n}}$.
		\item En déduire, si elle existe, la limite de la suite $\left(u_{n}\right)$.
	\end{enumerate}
\end{enumerate}

\newpage

{\large \textbf{\textsc{Exercice 4} \hfill  5 points}}

\medskip

\emph{Cet exercice est un questionnaire à choix multiples.\\
Pour chacune des questions suivantes, une seule des quatre réponses proposées est exacte. Une réponse exacte rapporte un point. Une réponse fausse, une réponse multiple ou l'absence de réponse à une question ne rapporte ni n'enlève de point. Pour répondre, indiquer sur la copie le numéro de la question et la lettre de la réponse choisie. Aucune justification n'est demandée.}

\bigskip

L'espace est rapporté à un repère orthonormé \Oijk.

\medskip
On considère :

les points A$(-1~;~-2~;~3)$, B$(1~;~-2~;~7)$ et C$(1~;~0~;~2)$;

la droite $\Delta$ de représentation paramétrique : \quad $\left\{\begin{array}{l}x=1-t \\ y=2 \\ z=-4+3 t\end{array}\right.$, où $t \in \R$;

le plan $\mathcal{P}$ d'équation cartésienne :\quad $3 x+2 y+z-4=0$;

le plan $\mathcal{Q}$ d'équation cartésienne : \quad $-6 x-4 y-2 z+7=0$.

\begin{enumerate}[itemsep=5mm]
	\item Lequel des points suivants appartient au plan $\mathcal{P}$ ?

	\begin{tabularx}{\linewidth}{*{4}{>{\bfseries}p{5mm}@{}X}}
		a.& $R(1~;~-3~;~1)$;&
		b.& $S(1~;~2~;~-1)$;&
		c.& $T(1~;~0~;~1)$;&
		d.& $U(2~;~-1~;~1)$.\\
	\end{tabularx}

	\item Le triangle ABC est :

	\begin{tabularx}{\linewidth}{*{2}{>{\bfseries}p{5mm}@{}X}}
		a.& équilatéral ;&
		b.& rectangle isocèle ;\\
		c.& isocèle non rectangle ;&
		d.& rectangle non isocèle.\\
	\end{tabularx}

	\item La droite $\Delta$ est :

	\begin{tabularx}{\linewidth}{*{2}{>{\bfseries}p{5mm}@{}X}}
		a.& orthogonale au plan $\mathcal{P}$ ;&
		b.& sécante au plan $\mathcal{P}$ ;\\
		c.& incluse dans le plan $\mathcal{P}$ ;&
		d.& strictement parallèle au plan $\mathcal{P}$.\\
	\end{tabularx}

	\item On donne le produit scalaire $\vect{\mathrm{BA}} \cdot \vect{\mathrm{BC}}=20$.

	Une mesure au degré près de l'angle $\widehat{\mathrm{ABC}}$ est :

	\begin{tabularx}{\linewidth}{*{4}{>{\bfseries}p{5mm}@{}X}}
		a.& $34^{\circ}$;&
		b.& $120^{\circ}$;&
		c.& $90^{\circ}$;&
		d.& $0^{\circ}$.\\
	\end{tabularx}

	\item L'intersection des plans $\mathcal{P}$ et $\mathcal{Q}$ est :

	\begin{tabularx}{\linewidth}{*{2}{>{\bfseries}p{5mm}@{}X}}
		a.& un plan ;&
		b.& l'ensemble vide ;   \\
		c.& une droite ;&
		d.& réduite à un point.\\
	\end{tabularx}
\end{enumerate}
\end{document}
