π
<-
Chat plein-écran
[^]

Correction algo exo 2 Obl. BAC ES/L 2016 (France - juin)

Discussions scientifiques et scolaires

Correction algo exo 2 Obl. BAC ES/L 2016 (France - juin)

Message non lude critor » 22 Juin 2016, 10:18

Correction algo exo 2 Obligatoire du sujet de Maths des BAC ES/L 2016 et tombé en France en juin 2016.

Question 3)a)
Dans l'algorithme proposé, la variable U initialisée à u0=10000 est donc destinée à recevoir les valeurs des termes de la suite.
Il nous reste donc à l'affecter selon la même relation de récurrence dans la boucle :
U prend la valeur 0,75U+3000


La variable N initialisée à 0 est donc le rang.
Il nous reste donc à l'incrémenter de 1 dans la boucle :
N prend la valeur N+1


Nous souhaitons que l'algorithme se termine sur la réalisation de la condition U≥11950.
Pour cela, la condition de poursuite de la boucle Tant que doit être le contraire : U<11950.
Tant que U<11950


Enfin, nous devons répondre l'année.
Le rang N étant compté à partir de 2015, nous devrons afficher 2015+N.
Afficher 2015+N


Question 3)b)
Pour pouvoir justifier de la réponse, rajoutons une instruction d'affichage en fin de boucle et programmons l'algorithme sur notre calculatrice graphique :

Algorithme
Programme
Code: Tout sélectionner
Initialisation
   U prend la valeur 10000
   N prend la valeur 0
Traitement
   Tant que U<11950
      N prend la valeur N+1
      U prend la valeur 0,75U+3000
      Afficher N et U
   Fin Tant que
   Afficher 2015+N
Code: Tout sélectionner
10000→U
0→N
While U<11950
   N+1→N
   0.75U+3000→U
   Disp {N,U,U<11950}
End
2015+N

Code: Tout sélectionner
Define fr2016esl()=
Func
   Local u,n
   10000→u
   0→n
   While u<11950
      n+1→n
      0.75∙u+3000→u
      Disp n,u,u<11950
   EndWhile
   Return 2015+n
EndFunc
Code: Tout sélectionner
10000→U
0→N
While U<11950
   N+1→N
   0.75U+3000→U
   {N,U,U<11950}◢
WhileEnd
2015+N

Code: Tout sélectionner
SetDecimal
10000⇒u
0⇒n
While u<11950
   n+1⇒n
   0.75u+3000⇒u
   Print {n,u,judge(u<11950)}
WhileEnd
Print 2015+n
Code: Tout sélectionner
EXPORT FR2016ESL()
BEGIN
   U:=10000;
   N:=0;
   WHILE U<11950 DO
      N:=N+1;
      U:=0.75*U+3000;
      PRINT({N,U,U<11950})
   END;
   PRINT(2015+N)
END;


D'où la trace des étapes de l'algorithme :


N012...1213
U100001050011156,25...11936,6511952,49
U<11950VraiVraiVrai...VraiFaux

La réponse est donc 2015+13=2028.
Image
Avatar de l’utilisateur
critorAdmin
Niveau 19: CU (Créateur Universel)
Niveau 19: CU (Créateur Universel)
Prochain niv.: 42.6%
 
Messages: 41501
Images: 14719
Inscription: 25 Oct 2008, 00:00
Localisation: Montpellier
Genre: Homme
Calculatrice(s):
MyCalcs profile
YouTube: critor3000
Twitter/X: critor2000
GitHub: critor

Retourner vers Maths, physique, informatique et autre...

Qui est en ligne

Utilisateurs parcourant ce forum: Aucun utilisateur enregistré et 72 invités

-
Rechercher
-
Social TI-Planet
-
Sujets à la une
Comparaisons des meilleurs prix pour acheter sa calculatrice !
Aidez la communauté à documenter les révisions matérielles en listant vos calculatrices graphiques !
Phi NumWorks jailbreak
123
-
Faire un don / Premium
Pour plus de concours, de lots, de tests, nous aider à payer le serveur et les domaines...
Faire un don
Découvrez les avantages d'un compte donateur !
JoinRejoignez the donors and/or premium!les donateurs et/ou premium !


Partenaires et pub
Notre partenaire Jarrety Calculatrices à acheter chez Calcuso
-
Stats.
1476 utilisateurs:
>1461 invités
>10 membres
>5 robots
Record simultané (sur 6 mois):
6892 utilisateurs (le 07/06/2017)
-
Autres sites intéressants
Texas Instruments Education
Global | France
 (English / Français)
Banque de programmes TI
ticalc.org
 (English)
La communauté TI-82
tout82.free.fr
 (Français)