π
<-
Chat plein-écran
[^]

Correction algo exo 2 Obl. BAC ES/L 2015, N. Calédonie nov.

Discussions scientifiques et scolaires

Correction algo exo 2 Obl. BAC ES/L 2015, N. Calédonie nov.

Message non lude critor » 24 Nov 2015, 16:31

Correction algo exercice n°2 obligatoire du sujet de Maths du BAC ES/L de novembre 2015 en Nouvelle Calédonie.

Question 3)a)
On nous demande de compléter une sorte de trace de l'algorithme, ici un tableau avec l'état des variables à chaque itération de la boucle tant que.
Il est très facile d'obtenir cela en programmant l'algorithme sur la calculatrice, et en y rajoutant une simple instruction d'affichage dans la boucle.

Voici les programmes pour calculatrices graphiques actuelles :

Algorithme
Programme
Code: Tout sélectionner
Initialisation :
   Affecter à n la valeur 0
   Affecter à U la valeur 150
Traitement :
   Tant que U≤190
      n prend la valeur n+1
      U prend la valeur 0,8U+40
      Afficher n, U, et U≤190
   Fin du Tant que
Sortie :
   Afficher le nombre 2014+n
Code: Tout sélectionner
0→N
150→U
While U≤190
   N+1→N
   0.8U+40→U
   Disp {N,arrondir(U,2),U≤190
End
2014+N

Code: Tout sélectionner
0→N
150→U
While U≤190
   N+1→N
   0.8U+40→U
   Disp {N,round(U,2),U≤190
End
2014+N

Code: Tout sélectionner
Define ncal2015eso()=
Func
   Local n,u
   0→n
   150→u
   While u≤190
      n+1→n
      0.8∙u+40→u
      disp n,round(u,2),u≤190
   EndWhile
   Return 2014+n
EndFunc
Code: Tout sélectionner
0→N
150→U
While U≤190
   N+1→N
   0.8U+40→U
   {N,U,U≤190}◢
WhileEnd
2014+N

Code: Tout sélectionner
SetDecimal
0⇒n
150⇒u
While u≤190
   n+1⇒n
   0.8u+40⇒u
   Print {n,u,judge(u≤190)}
WhileEnd
Print 2014+n
Ne pas oublier le 'SetDecimal' en début de programme,
pour obtenir les résultats en écriture décimale.
Code: Tout sélectionner
EXPORT ncal2015eso()
BEGIN
   N:=0;
   U:=150;
   WHILE U≤190 DO
      N:=N+1;
      U:=0.8*U+40;
      PRINT({N,ROUND(U,2),U≤190})
   END;
   PRINT(2014+N)
END;


D'où la réponse :
Valeur de n012345678
Valeur de U150160168174,4179,52183,62186,89189,51191,61
Condition U≤190VraieVraieVraieVraieVraieVraieVraieVraieFausse


Question 3)b)
L'algorithme s'articule autour d'une unique boucle tant que, de condition de poursuite U≤190.
Il se termine donc sur la réalisation de la condition contraire U>190.
La variable n valant alors 8, le résultat affiché est 2014+8=2022.

Cet algorithme travaille sur la suite de l'énoncé, que l'on reconnaît à :
  • la variable n, initialisée à 0 et incrémentée de 1 dans la boucle, qui est donc le rang.
  • la variable U, initialisée à u0=150 et affectée de façon récurrente dans la boucle, qui contient donc la valeur du terme un.

Le résultat affiché 2014+n est une année, 2014 ayant pour rang 0.
L'algorithme se terminant sur la réalisation de la condition U>190, il s'agit de la première année vérifiant un>190, soit la première année où l'effectif des élèves inscrits au service périscolaire dépassera 190.
Image
Avatar de l’utilisateur
critorAdmin
Niveau 19: CU (Créateur Universel)
Niveau 19: CU (Créateur Universel)
Prochain niv.: 42.5%
 
Messages: 41498
Images: 14695
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 68 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.
1764 utilisateurs:
>1724 invités
>35 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)