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

\documentclass[french,a4paper,11pt]{article}
\usepackage[margin=2cm,includeheadfoot]{geometry}
\usepackage{ProfLycee}
\useproflyclib{ecritures}
\usepackage[upright]{fourier}
\usepackage{cabin}
\usepackage{amsmath,amssymb,amstext}
\usepackage[scaled=0.875]{helvet}
\renewcommand\ttdefault{lmtt}
\usepackage{decimalcomma}
\usepackage{esvect}
\usepackage{tabularx}
\usepackage{multicol}
\usepackage{logoetalab}
\usepackage[nonpgfplots]{tkz-grapheur}
\usepackage{tikz3d-fr}
\newcommand{\session}{2025}
\newcommand{\annee}{2025}
\newcommand{\serie}{Gé.}
\newcommand{\lieu}{Am. du Sud}%merci à Rémi D. pour le sujet
\newcommand{\jour}{13}
\newcommand{\mois}{novembre}
\newcommand{\numsujet}{1}
\newcommand{\codesujet}{25-MATJ1AS1}
\newcommand{\nomfichier}{[BAC \serie{} \annee{}] \lieu{} (\mois{} \annee)}
\def\listenumexos{1,2,3,4}
\setsepchar{,}
\def\repartpts{4,5,6,5}\readlist*\nbptsexo{\repartpts}
\def\repartthemes{%
	{Probabilités conditionnelles / Suites /Python},
	{VRAI\&{}FAUX / Combinatoire / Loi de probabilités},
	{Équations différentielles / Exponentielle / Variations / Intégration},
	{Espace}
}\readlist*\themessexo{\repartthemes}

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

\hypersetup{pdfauthor={Pierquet},pdftitle={\nomfichier},allbordercolors=white,pdfborder=0 0 0,pdfstartview=FitH}
%transcription principale faite par mistral.ai
\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 25-MATJ1AS1}
\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}
}

\ifdef{\halignnb}{}{\newcommand\halignnb[2][]{#2}}
\usepackage{twemojis}
\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
}

\usetikzlibrary{hobby}
\usepackage{scontents}
%script python
\begin{scontents}[overwrite,write-out=amsud2025j1exo1a.py]
def repas(n) :
	p = 1
	L = [p]
	for k in range(1, n) :
		p = 0.2 * p + 0.7
		L.append(p)
	return L
\end{scontents}

\begin{scontents}[overwrite,write-out=amsud2025j1exo1b.py]
def repas(n) :
	p = 1
	L = [p]
	for k in range(1, n+1) :
		p = 0.2 * p + 0.7
		L.append(p)
	return L
\end{scontents}

\begin{scontents}[overwrite,write-out=amsud2025j1exo1c.py]
def repas(n) :
	p = 1
	L = [p]
	for k in range(1, n+1) :
		p = 0.2 * p + 0.7
		L.append(p+1)
	return L
\end{scontents}

\begin{document}

\pagestyle{fancy}

%\hfill\twemoji[height=5cm]{1f3dd}\hfill\null
\ifdef{\pflpictobac}{\hfill\pflpictobac[height=5cm]{amsud.v1}\hfill\null}{\hfill\Huge\faGraduationCap\hfill\null}

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

\vspace{0.6cm}

\sujetbaclabelexos{4}

\pagebreak

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

\medskip

Un étudiant mange tous les jours au restaurant universitaire. Ce restaurant propose des plats végétariens et des plats non végétariens.

\begin{itemize}
	\item Lorsqu'un jour donné l'étudiant a choisi un plat végétarien, la probabilité qu'il choisisse un plat végétarien le lendemain est $0,9$.
	\item Lorsqu'un jour donné l'étudiant a choisi un plat non végétarien, la probabilité qu'il choisisse un plat végétarien le lendemain est $0,7$.
\end{itemize}

Pour tout entier naturel $n$, on note $V_n$ l'événement « l'étudiant a choisi un plat végétarien le $n^{\text{ième}}$ jour » et $p_n$ la probabilité de $V_n$.

Le jour de la rentrée, l'étudiant a choisi le plat végétarien. On a donc $p_1 = 1$.

\begin{enumerate}
	\item
	\begin{enumerate}
		\item Indiquer la valeur de $p_2$.
		\item  Montrer que $p_3 = 0,88$. On pourra s'aider d'un arbre pondéré.
		\item Sachant que le 3\textsuperscript{e} jour l'étudiant a choisi un plat végétarien, quelle est la probabilité qu'il ait choisi un plat non végétarien le jour précédent ? On arrondira le résultat à $ 10^{-3} $.
	\end{enumerate}
	\item Recopier et compléter l'arbre pondéré ci-dessous :
	
	\begin{Centrage}
		\ArbreProbasTikz{$V_{n}$/$p_{n}$/,$V_{n+1}$/\numdots/,$\overline{V}_{n+1}$/\numdots/,$\overline{V}_{n}$/\numdots/,$V_{n+1}$/\numdots/,$\overline{V}_{n+1}$/\numdots/}
	\end{Centrage}
	\item Justifier que, pour tout entier naturel $n \geqslant 1$, $p_{n+1}=0,2p_n + 0,7$.
	\item On souhaite disposer de la liste des premiers termes de la suite $\left(p_n\right)$ pour $n \geqslant 1$.
	
	Pour cela, on utilise une fonction appelée \AffVignette[Type=py]{repas} programmée en langage \textsf{Python} dont on propose trois versions, indiquées ci-dessous.
	
	\medskip
	
	\begin{minipage}{0.33\linewidth}
		\CodePythonLstFichierAlt[\linewidth]{center,title={Programme 1},listing options={style=PLpython,xleftmargin=\PythonCodeXLeft,numbers=left,tabsize=2,basicstyle=\ttfamily\scriptsize}}{amsud2025j1exo1a.py}
	\end{minipage}
	%
	\begin{minipage}{0.33\linewidth}
		\CodePythonLstFichierAlt[\linewidth]{center,title={Programme 2},listing options={style=PLpython,xleftmargin=\PythonCodeXLeft,numbers=left,tabsize=2,basicstyle=\ttfamily\scriptsize}}{amsud2025j1exo1b.py}
	\end{minipage}
	%
	\begin{minipage}{0.33\linewidth}
		\CodePythonLstFichierAlt[\linewidth]{center,title={Programme 3},listing options={style=PLpython,xleftmargin=\PythonCodeXLeft,numbers=left,tabsize=2,basicstyle=\ttfamily\scriptsize}}{amsud2025j1exo1c.py}
	\end{minipage}
	\begin{enumerate}
		\item Lequel de ces programmes permet d'afficher les $n$ premiers termes de la suite $\left(p_n\right)$ ? Aucune justification n'est attendue.
		\item Avec le programme choisi à la question \textbf{(a)}, donner le résultat affiché pour \AffVignette[Type=py]{n = 5}.
	\end{enumerate}
	\item Démontrer par récurrence que, pour tout entier naturel $n \geqslant 1$, $p_n = 0,125 \times 0,2^{n-1} + 0,875 $.
	\item En déduire la limite de la suite $\left(p_n\right)$.
\end{enumerate}

\pagebreak

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

\medskip

Pour chacune des affirmations suivantes, indiquer si elle est vraie ou fausse. Chaque réponse doit être justifiée.

\begin{enumerate}
	\item Deux équipes de footballeurs de 22 et 25 joueurs échangent une poignée de main à la fin d'un match. Chaque joueur d'une équipe serre une seule fois la main de chaque joueur de l'autre équipe.
	
	\medskip
	
	\hspace*{0.6cm}%
	\begin{minipage}{\dimexpr\linewidth-1cm\relax}
		\textbf{Affirmation 1}\\
		47 poignées de mains ont été échangées.
	\end{minipage}
	
	\medskip
	\item Une course oppose 18 concurrents. On récompense indistinctement les trois premiers en offrant le même prix à chacun.
	
	\medskip
	
	\hspace*{0.6cm}%
	\begin{minipage}{\dimexpr\linewidth-1cm\relax}
		\textbf{Affirmation 2}\\%erreur dans l'énoncé ??
		 Il y a \num{4896} possibilités de distribuer ces prix.
	\end{minipage}
	
	\medskip
	\item Une association organise une compétition de course de haies qui permettra d'établir un podium. Sept sportifs participent au tournoi. Jacques est l'un d'entre eux.
	
	\medskip
	
	\hspace*{0.6cm}%
	\begin{minipage}{\dimexpr\linewidth-1cm\relax}
		\textbf{Affirmation 3}\\%erreur dans l'énoncé ??
		Il y a 90 podiums différents dont Jacques fait partie.
	\end{minipage}
	
	\medskip
	\item Soit $X_1$ et $X_2$ deux variables aléatoires de même loi donnée par le tableau ci-dessous :
	
	\begin{Centrage}
		\begin{tblr}{width=10cm,hlines,vlines,colspec={Q[m,c]*{4}{X[m,c]}}}
			$x_i$& $-2$ & $-1$ & $2$ & $5$ \\
			$P(X = x_i)$& $0,1$ & $0,4$ & $0,3$ & $0,2$ \\
		\end{tblr}
	\end{Centrage}
	
	On suppose que $X_1$ et $X_2$ sont indépendantes et on considère $Y$ la variable aléatoire somme de ces deux variables aléatoires.
	
	\medskip
	
	\hspace*{0.6cm}%
	\begin{minipage}{\dimexpr\linewidth-1cm\relax}
		\textbf{Affirmation 4}\\
		$P(Y = 4) = 0,25$.
	\end{minipage}
	
	\medskip
	\item Un nageur s'entraîne dans l'objectif de parcourir le 50 mètres nage libre en moins de 25 secondes.
	
	Au fil des entraînements, il s'avère que la probabilité qu'il y parvienne s'établit à 0,85.
	
	Il effectue, sur une journée, 20 parcours chronométrés sur 50 mètres. On note $X$ la variable aléatoire qui compte le nombre de fois où il nage cette distance en moins de 25 secondes lors de cette journée. On admet que $X$ suit la loi binomiale de paramètres $n = 20$ et $p = 0,85$.
	
	\medskip
	
	\hspace*{0.6cm}%
	\begin{minipage}{\dimexpr\linewidth-1cm\relax}
		\textbf{Affirmation 5}\\
		Sachant qu'il a atteint au moins 15 fois son objectif, une valeur approchée à $10^{-3}$ de la probabilité qu'il l'ait atteint au moins 18 fois est $0,434$.
	\end{minipage}
\end{enumerate}

\pagebreak

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

\medskip

On se propose d'étudier la concentration dans le sang d'un médicament ingéré par une personne pour la première fois. Soit $t$ le temps (en heures) écoulé depuis l'ingestion de ce médicament. On admet que la concentration de ce médicament dans le sang, en gramme par litre de sang, est modélisée par une fonction $f$ de la variable $t$ définie sur l'intervalle $\IntervalleFO{0}{+\infty}$.

\medskip

\textbf{Partie A : lectures graphiques}

\begin{Centrage}
	\begin{GraphiqueTikz}[x=2cm,y=2cm,Xmin=-0.4,Xmax=7.6,Xgrille=0.5,Xgrilles=0.1,Ymin=-0.6,Ymax=2.2,Ygrille=0.5,Ygrilles=0.1]
		\tikzset{pflgrillep/.style={thin,gray}}
		\TracerAxesGrilles[]{0,...,7}{0,1,2}
		\DefinirCourbe[Couleur=red,Nom=cf,Debut=0,Trace]<f>{5*x*exp(-x)}
		\PlacerTexte[Police=\bfseries\footnotesize]{(7,-0.33)}{Temps en heures}
		\PlacerTexte[Police=\bfseries\footnotesize,Position=above]{(0,2.2)}{Concentration en g/L}
	\end{GraphiqueTikz}
\end{Centrage}

On a représenté ci-dessus la courbe représentative de la fonction $f$.

Avec la précision permise par le graphique, donner sans justification :

\begin{enumerate}
	\item Le temps écoulé depuis l'instant de l'ingestion de ce médicament et l'instant où la concentration de médicament dans le sang est maximale selon ce modèle.
	\item L'ensemble des solutions de l'inéquation $f(t) \geqslant 1$.
	\item La convexité de la fonction $f$ sur l'intervalle $\IntervalleFF{0}{8}$.
\end{enumerate}

\smallskip

\textbf{Partie B : détermination de la fonction $\bm{f}$}

\medskip

On considère l'équation différentielle $(E)~:~y' + y = 5\e^{-t} $, d'inconnue $y$, où $y$ est une fonction définie et dérivable sur l'intervalle $\IntervalleFO{0}{+\infty}$.

\smallskip

On admet que la fonction $f$ est une solution de l'équation différentielle $(E)$.

\begin{enumerate}
	\item Résoudre l'équation différentielle $(E')~:~y' + y = 0$.
	\item Soit $u$ la fonction définie sur l'intervalle $\IntervalleFO{0}{+\infty}$ par $u(t) = \alpha\,t\,\e^{-t}$ avec $ \alpha \in \R$.
	
	Déterminer la valeur du réel $\alpha$ telle que la fonction $u$ soit solution de l'équation $(E)$.
	\item En déduire l'ensemble des solutions de l'équation différentielle $(E)$.
	\item La personne n'ayant pas pris ce médicament auparavant, on admet que $f(0)=0$.
	
	Déterminer l'expression de la fonction $f$.
\end{enumerate}

\smallskip

\textbf{Partie C : étude de la fonction $\bm{f}$}

\medskip

Dans cette partie, on admet que $f$ est définie sur l'intervalle $\IntervalleFO{0}{+\infty}$ par $f(t)=5t\,\e^{-t}$.

\begin{enumerate}
	\item Déterminer la limite de $f$ en $+\infty$.
	
	Interpréter ce résultat dans le contexte de l'exercice.
	\item Étudier les variations de $f$ sur l'intervalle $\IntervalleFO{0}{+\infty}$ puis dresser son tableau de variation complet.
	\item Démontrer qu'il existe deux réels $t_1$ et $t_2$ tels que $f(t_1) = f(t_2) = 1$.
	
	On donnera une valeur approchée à $10^{-2}$ des réels $t_1$ et $t_2$.
	\item Pour une concentration du médicament supérieure ou égale à 1 gramme par litre de sang, il y a un risque de somnolence.
	
	Quelle est la durée en heures et minutes du risque de somnolence lors de la prise de ce médicament ?
\end{enumerate}

\smallskip

\textbf{Partie D : concentration moyenne}

\medskip

La concentration moyenne du médicament (en gramme par litre de sang) durant la première heure est donnée par : \[ T_m = \int_0^1 f(t) \dx[t]\]
%
où $f$ est la fonction définie sur $\IntervalleFO{0}{+\infty}$ par $f(t)=5t\,\e^{-t}$.

Calculer cette concentration moyenne.

On donnera la valeur exacte puis une valeur approchée à $0,01$ près.

\pagebreak

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

\medskip

\begin{Centrage}
	\begin{EnvTikzEspace}[UniteX={-152.5:1.8cm},UniteY={-10:2.5cm},UniteZ={90:2.75cm}]<thick>
		\draw[] (0,0,0)--(4,0,0) ;
		\draw[] (0,0,0)--(0,2.5,0) ;
		\draw[] (0,0,0)--(0,0,1.25) ;
		\draw (0,0,0) node[below] {$O$} ;
		\PlacePointsEspace[]{A/{2*sqrt(3)},0,0/hg B/0,2,0/hd C/0,0,1/hg K/{0.5*sqrt(3)},1.5,0/bd}
		\TraceSegmentsEspace[darkgray,very thick]{A/B B/C C/A C/K}
		\draw[->,>=latex] (0,0,0)--(1,0,0) node[midway,above] {$\vec{\imath}$} ;
		\draw[->,>=latex] (0,0,0)--(0,1,0) node[midway,above] {$\vec{\jmath}$} ;
		\draw[->,>=latex] (0,0,0)--(0,0,1) node[midway,left] {$\vec{k}$} ;
	\end{EnvTikzEspace}
\end{Centrage}

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

\medskip

On considère les points $A\left(2\sqrt{3}; 0; 0\right)$, $B(0; 2; 0)$, $C(0; 0; 1)$ et $K\left(\frac{\sqrt{3}}{2};\frac{3}{2};0\right)$.

\begin{enumerate}
	\item Justifier qu'une représentation paramétrique de la droite $(CK)$ est : \[ \begin{cases} x = \frac{\sqrt{3}}{2} t \\ y = \frac{3}{2} t \\ z = -t + 1 \end{cases} \qquad (t \in \R).\]
	\item Soit $M(t)$ un point de la droite $(CK)$ paramétrée par un réel $t$.
	
	Établir que $OM(t)=\sqrt{4 t^2 - 2 t + 1}$.
	\item Soit $f$ la fonction définie et dérivable sur $\R$ par $f(t) = OM(t)$.
	\begin{enumerate}
		\item Étudier les variations de la fonction $ f $ sur $\R$.
		\item En déduire la valeur de $ t $ pour laquelle $f$ atteint son minimum.
	\end{enumerate}
	\item En déduire que le point $H\left(\frac{\sqrt{3}}{8};\frac{3}{8};\frac{3}{4}\right)$ est le projeté orthogonal du point $O$ sur la droite $(CK)$.
	\item Démontrer, à l'aide de l'outil produit scalaire, que le point $H$ est l'orthocentre (\textit{intersection des hauteurs d'un triangle}) du triangle $ABC$.
	\item
	\begin{enumerate}
		\item Démontrer que la droite $(OH)$ est orthogonale au plan $(ABC)$.
		\item En déduire une équation du plan $(ABC)$.
	\end{enumerate}
	\item Calculer, en unité d'aire, l'aire du triangle $ABC$.
\end{enumerate}

\end{document}

