% !TeX TXS-program:compile = txs:///pdflatex

\documentclass[french,a4paper,11pt]{article}
\usepackage[margin=2cm,includeheadfoot]{geometry}
\usepackage{ProfLycee}
\useproflyclib{ecritures}
\RequirePackage[upright]{fourier}
\usepackage{amsmath,amssymb,amstext}
\usepackage[scaled=0.875]{helvet}
\renewcommand\ttdefault{lmtt}
\usepackage{decimalcomma}
\usepackage{esvect}
\usepackage{tabularx}
\usepackage{multicol}
\usepackage{logoetalab}

\newcommand{\session}{2024}
\newcommand{\annee}{2024}
\newcommand{\serie}{Gé.}
\newcommand{\lieu}{Centres étrangers}
\newcommand{\jour}{05}
\newcommand{\mois}{juin}
\newcommand{\numsujet}{1}
\newcommand{\nomfichier}{[BAC \serie{} \annee{}] \lieu{} (\mois{} \annee)}

\title{\nomfichier}
\usepackage{hyperref}
\usepackage{lastpage}
\usepackage{enumitem}
\usepackage{ibrackets}
\usepackage{customenvs}
\usepackage{fancyhdr}
\usepackage{bm}
\usepackage{tkz-euclide}
\usepackage{babel}

\hypersetup{pdfauthor={Pierquet},pdftitle={\nomfichier},allbordercolors=white,pdfborder=0 0 0,pdfstartview=FitH}
\lhead{\scriptsize\sffamily BAC \serie{} \session}
\chead{\scriptsize\sffamily \hyperlink{sommaire}{\lieu{} - Sujet \numsujet}}
\rhead{\scriptsize\sffamily \jour{} \mois{} \annee{}}
\lfoot{\scriptsize\sffamily \affloetalab[Legende,TexteLegende={Licence Etalab 2.0}]}
\cfoot{\scriptsize\sffamily 24-MATJ1G11}
\rfoot{\scriptsize\sffamily - \thepage{}/{}\pageref{LastPage} -}
\setlength{\parindent}{0pt}
%divers
\DeclareMathSymbol{;}\mathbin{operators}{'73}
\newcommand\Rij{\left(O;\vect{\imath},\,\vect{\jmath}\right)}
\newcommand\Rijk{\left(O;\vect{\imath},\,\vect{\jmath},\,\vect{k}\right)}
\newcommand\intervOO[2]{\left]#1;#2\right[}
\newcommand\intervFF[2]{\left[#1;#2\right]}
\newcommand\intervOF[2]{\left]#1;#2\right]}
\newcommand\intervFO[2]{\left[#1;#2\right[}
\newcommand\pta[1]{(#1)}
\newcommand\suiten[1][u]{\left(#1_n\right)}
\newcommand\vect[1]{\vv{#1}}
\usepackage{forest}
\forestset{
	fleche/.style = {edge={thick}},
	aproba/.style = {edge label = {node[above=6pt,pos=.5,fill=white] {$#1$}}},%poids au-dessus
	bproba/.style = {edge label = {node[below=6pt,pos=.5,fill=white] {$#1$}}},%poids en-dessous
}
\tikzset{
	ptcroix/.pic = {
		\draw[rotate = 45] (-#1,0) -- (#1,0);
		\draw[rotate = 45] (0,-#1) -- (0, #1);
	}
}
\newcommand\qcmdeux[4]{%
	\begin{tblr}{width=\linewidth,colspec={*{2}{X[m,l]}}}
		(a)~~#1 & (b)~~#2 \\
		(c)~~#3 & (d)~~#4 \\
	\end{tblr}
}

\newcommand\qcm[4]{%
	\begin{tblr}{width=\linewidth,colspec={*{4}{X[m,l]}}}
		(a)~~#1 & (b)~~#2 & (c)~~#3 & (d)~~#4 \\
	\end{tblr}
}
\usetikzlibrary{hobby}


%--- Nouveaux packages pour la page de garde 2025 ---
\usepackage{cabin}
\usepackage{twemojis}

%--- Déclarations propres à ce sujet ---
\newcommand{\codesujet}{24-MATJ1G11}
\def\listenumexos{1,2,3,4}
\setsepchar{,}
\def\repartpts{5,5,5,5}\readlist*\nbptsexo{\repartpts}
\def\repartthemes{%
	{Suites / Fonctions},
	{Fonctions / Intégrales},
	{Équations différentielles / Fonctions},
	{Géométrie dans l'espace}
}\readlist*\themessexo{\repartthemes}

%--- Commandes de mise en page ---
\ifdef{\halignnb}{}{\newcommand\halignnb[2][]{#2}}
\newlength\tmpemojipen
\newcommand\sujetbaclabelexos[1]{%
	\begin{tcolorbox}[width=0.875\linewidth,colframe=blue!50!black,colback=blue!1]
		\foreach \i in {1,...,#1}{%
			\textcolor{blue!50!black}{\hyperlink{exon\i}{\faLink}~~\Large\bfseries\cabin Exercice \halignnb[\listenumexos]{\i} (\halignnb[\repartpts]{\nbptsexo[\i]} points)}\\%
			\hspace*{5mm}\textcolor{purple}{\large\cabin{\vphantom{\Large()}$\blacktriangleright$~\themessexo[\i]}}\ifnum\i=#1\relax\else\\\\\fi%
		}%
	\end{tcolorbox}%

	\vspace*{0.5cm}

	\settowidth\tmpemojipen{\hbox{\twemoji[height=1.5cm]{memo}}}%
	\begin{tcolorbox}[enhanced,width=0.875\linewidth,colframe=red!50!black,colback=red!1,flush right,fontupper=\footnotesize\cabin,left=1.25\tmpemojipen,underlay={\draw ([xshift=0.625\tmpemojipen]frame.west) node[] {\twemoji[height=1.5cm]{memo}} ;}]
		L'usage de calculatrice avec mode examen actif est autorisé.\\
		L'usage de la calculatrice sans mémoire « type collège » est autorisé.\\
		La qualité de rédaction, la clarté et la précision des raisonnements seront prises en compte dans l'appréciation de la copie. \\
		Les traces de recherche, même incomplètes ou infructueuses, seront valorisées.
	\end{tcolorbox}%

	\vspace*{0.5cm}

	\hfill\pictostamp[radius=1.75cm,maincolor=violet!50!black]{\codesujet}\hfill\null
}

\begin{document}

\pagestyle{fancy}


\hypertarget{sommaire}{}
\ifdef{\pflpictobac}{\hfill\pflpictobac[height=5cm]{ce.v3}\hfill\null}{\hfill\Huge\faGraduationCap\hfill\null}

\part*{\lieu{}, Bac \serie{}, \jour{} \mois{} \annee, sujet n°\numsujet}

\vspace{1cm}


\sujetbaclabelexos{4}

\pagebreak


\hypertarget{exon1}{}\section*{Exercice 1\dotfill{}(\nbptsexo[1] points)} %exo1

\medskip

\textbf{Partie A}

\medskip

On définit la fonction $f$ sur l'intervalle $\IntervalleFF{0}{1}$ par \[ f(x)=\frac{0,96x}{0,93x+0,03}. \]

\begin{enumerate}
	\item Démontrer que, pour tout $x$ appartenant à l'intervalle $\IntervalleFF{0}{1}$, \[ f'(x)=\frac{\num{0,0288}}{(0,93x+0,03)^2}. \]
	\item Déterminer le sens de variation de la fonction $f$ sur l'intervalle $\IntervalleFF{0}{1}$.
\end{enumerate}

\smallskip

\textbf{Partie B}

\medskip


La lutte contre le dopage passe notamment par la réalisation de contrôles antidopage qui visent à déterminer si un sportif a fait usage de substances interdites.

Lors d'une compétition rassemblant \num{1000} sportifs, une équipe médicale teste tous les concurrents. On propose d'étudier la fiabilité de ce test.

\medskip

On appelle $x$ le réel compris entre 0 et 1 qui désigne la proportion de sportifs dopés.

\medskip

Lors de l'élaboration de ce test, on a pu déterminer que :

\begin{itemize}
	\item la probabilité qu'un sportif soit déclaré positif sachant qu'il est dopé est égale à $0,96$ ;
	\item la probabilité qu'un sportif déclaré positif sachant qu' il n'est pas dopé est égale à $0,03$.
\end{itemize}

On note :

\begin{itemize}
	\item $D$ l'événement: « le sportif est dopé » ;
	\item $T$ l'événement : « le test est positif »
\end{itemize}

\begin{enumerate}
	\item Recopier et compléter l'arbre de probabilité ci-dessous :

	\begin{Centrage}
		\ArbreProbasTikz[PositionProbas=auto]{$D$/$x$/,$T$/\numdots/,$\overline{T}$/\numdots/,$\overline{D}$/$1-x$/,$T$/\numdots/,$\overline{T}$/\numdots/}
	\end{Centrage}
	\item Déterminer, en fonction de $x$ la probabilité qu'un sportif soit dopé et ait un test positif.
	\item Démontrer que la probabilité de l'événement $T$ est égale à $0,93x + 0,03$.
	\item Pour cette question uniquement, on suppose qu'il y a 50 sportifs dopés parmi les \num{1000} testés.

	La fonction $f$ désigne la fonction définie à la \textbf{partie A}.

	Démontrer que la probabilité qu'un sportif soit dopé sachant que son test est positif est égale à $f(0,05)$. En donner une valeur arrondie au centième.
	\item On appelle valeur prédictive positive d'un test la probabilité que le sportif soit réellement dopé lorsque le résultat du test est positif.
	\begin{enumerate}
		\item Déterminer à partir de quelle valeur de $x$ la valeur prédictive positive du test étudié sera supérieure ou égale à $0,9$. \textit{Arrondir le résultat au centième.}
		\item Un responsable de la compétition décide de ne plus tester l'ensemble des sportifs, mais de cibler les sportifs les plus performants supposés être plus fréquemment dopés.

		Quelle est la conséquence de cette décision sur la valeur prédictive positive du test ? \textit{Argumenter en utilisant un résultat de la \textbf{Partie A}.}
	\end{enumerate}
\end{enumerate}

\vspace*{5mm}

\hypertarget{exon2}{}\section*{Exercice 2\dotfill{}(\nbptsexo[2] points)} %exo2

\medskip

On considère la fonction $f$ définie sur l'intervalle $\IntervalleFF{0}{1}$ par $f(x)=2x\,\e^{-x}$.

On admet que la fonction $f$ est dérivable sur l'intervalle $\IntervalleFF{0}{1}$.

\begin{enumerate}
	\item
	\begin{enumerate}
		\item Résoudre sur l'intervalle $\IntervalleFF{0}{1}$ l'équation $f(x)=x$.
		\item Démontrer que, pour tout $x$ appartenant à l'intervalle $\IntervalleFF{0}{1}$, $f'(x)=2(1-x)\e^{-x}$.
		\item Donner le tableau de variations de la fonction $f$ sur l'intervalle $\IntervalleFF{0}{1}$.
	\end{enumerate}
\end{enumerate}


On considère la suite $\Suite{u}$ définie par $u_0=0,1$ et pour tout entier naturel $n$, \[ u_{n+1}=f\big(u_n\big).\]

\begin{enumerate}[resume]
	\item
	\begin{enumerate}
		\item Démontrer par récurrence que, pour tout $n$ entier naturel, $0 \leqslant u_n \leqslant u_{n+1} \leqslant 1$.
		\item En déduire que la suite $\Suite{u}$ est convergente.
	\end{enumerate}
	\item Démontrer que la limite de la suite $\Suite{u}$ est $\ln(2)$.
	\item
	\begin{enumerate}
		\item Justifier que pour tout entier naturel $n$, $\ln(2)-u_n$ est positif.
		\item On souhaite écrire un script \textsf{Python} qui renvoie une valeur approchée de $\ln(2)$ par défaut à $10^{-4}$ près, ainsi que le nombre d'étapes pour y parvenir.

		Recopier et compléter le script ci-dessous afin qu'il réponde au problème posé.

\begin{CodePythonLstAlt}*[Largeur=0.5\linewidth]{center}
def seuil() :
	n = 0
	u = 0.1
	while ln(2) - u ... 0.0001 :
		n = n+1
		u = ...
	return (u, n)
\end{CodePythonLstAlt}
	\item Donner la valeur de la variable \texttt{n} renvoyée par la fonction \texttt{seuil()}.
	\end{enumerate}
\end{enumerate}

\pagebreak

\hypertarget{exon3}{}\section*{Exercice 3\dotfill{}(\nbptsexo[3] points)} %exo3

\medskip

On considère l'équation différentielle $\big(E_0\big)$ : $y'=y$ où $y$ est une fonction dérivable de la variable réelle $x$.

\begin{enumerate}
	\item Démontrer que l'unique fonction constante solution de l'équation différentielle $\big(E_0\big)$ est la fonction nulle.
	\item Déterminer toutes les solutions de l'équation différentielle $\big(E_0\big)$.
\end{enumerate}

On considère l'équation différentielle $\big(E\big)$ : $y'=y-\cos(x)-3\sin(x)$ où $y$ est une fonction dérivable de la variable réelle $x$.

\begin{enumerate}[resume]
	\item La fonction $h$ est définie sur $\R$ par $h(x) = 2\cos(x) + \sin(x)$.

	On admet qu'elle est dérivable sur $\R$.

	Démontrer que la fonction $h$ est solution de l'équation différentielle $\big(E\big)$.
	\item On considère une fonction $f$ définie et dérivable sur $\R$.

	Démontrer que : « $f$ est solution de $\big(E\big)$ » est équivalent à « $f-h$ est solution de $\big(E_0\big)$ ».
	\item En déduire toutes les solutions de l'équation différentielle $\big(E\big)$.
	\item Déterminer l'unique solution $g$ de l'équation différentielle $\big(E\big)$ telle que $g(0) = 0$.
	\item Calculer : \[ \int_{0}^{\tfrac{\pi}{2}} \left(-2\e^{x}+\sin(x)+2\cos(x)\right)\dx. \]
\end{enumerate}

\pagebreak

\hypertarget{exon4}{}\section*{Exercice 4\dotfill{}(\nbptsexo[4] points)} %exo4

\medskip

L'espace est muni d'un repère orthonormé $\Rijk$.

On considère :

\begin{itemize}
	\item les points $A(-2;0;2)$, $B(-1;3;0)$, $C(1;-1;2)$ et $D(0;0;3)$ ;
	\item la droite $\mathcal{D}_1$ dont une représentation paramétrique est $\begin{dcases}x=t\\y=3t\\z=3+5t\end{dcases}$ avec $t \in \R$ ;
	\item la droite $\mathcal{D}_2$ dont une représentation paramétrique est $\begin{dcases}x=1+3s\\y=-1-5s\\z=2-6s\end{dcases}$ avec $s \in \R$.
\end{itemize}

\begin{enumerate}
	\item Démontrer que les points $A$, $B$ et $C$ ne sont pas alignés.
	\item
	\begin{enumerate}
		\item Démontrer que le vecteur $\Vecteur{n}\begin{pmatrix}1\\3\\5\end{pmatrix}$ est orthogonal au plan $(ABC)$.
		\item Justifier qu'une équation cartésienne du plan $(ABC)$ est : \[ x+3y+5z-8=0. \]
		\item En déduire que les points $A$, $B$, $C$ et $D$ ne sont pas coplanaires.
	\end{enumerate}
	\item
	\begin{enumerate}
		\item Justifier que la droite $\mathcal{D}_1$ est la hauteur du tétraèdre $ABCD$ issue de $D$.
	\end{enumerate}
	On admet que la droite $\mathcal{D}_2$ est la hauteur du tétraèdre $ABCD$ issue de $C$.
	\begin{enumerate}[resume]
		\item Démontrer que les droites $\mathcal{D}_1$ et $\mathcal{D}_2$ sont sécantes et déterminer les coordonnées de leur point d'intersection.
	\end{enumerate}
	\item
	\begin{enumerate}
		\item Déterminer les coordonnées du projeté orthogonal $H$ du point $D$ sur le plan $(ABC)$.
		\item Calculer la distance du point $D$ au plan $(ABC)$. \textit{Arrondir le résultat au centième.}
	\end{enumerate}
\end{enumerate}

\end{document}