Page 1346 - IT2
P. 1346

Lire stg.date_abs.mois
                      Lire stg.date_abs.annee
                      Ecrire « entrez le nombre de jour d’absence »
                      Lire stg.nombre_jour_abs

                   3. Modifier l’algorithme pour saisir les informations de N stagiaires. Variable
                      stg[ ] :stagiaire
                      N,i :entier
                      Début
                      Ecrire « entrez le nombre des stagiaire »
                      Lire N Redim
                      stg[N ]  pour i
                      de 1 a N
                      Ecrire « entrez le cin du stagiaire » Lire
                      stg[i].cin

                      Ecrire « entrez le nom du stagiaire »
                      Lire stg[i].nom
                      Ecrire « entrez le prénom du stagiaire »
                      Lire stg[i].prénom
                      Ecrire « entrez le groupe du stagiaire »
                      Lire stg[i].groupe
                      Ecrire « entrez la date d absence »
                      Lire stg[i].date_abs.jour
                       Lire stg[i].date_abs.mois
                      Lire stg[i].date_abs.annee
                      Ecrire « entrez le nombre de jour d’absence »
                      Lire stg[i].nombre_jour_abs
                      Fin pour
                   4. Afficher les informations desstagiaires ayant un nombre de jour d’absence supérieur à 5
                      jours.
                   pour i de 1 a N
                   Si stg[i].nombre_jour_abs>5 alors
                   { ecrire stg[i].cin ecrire
                   stg[i].nom ecrire
                   stg[i].prénom  ecrire
                   stg[i].groupe ecrire
                   stg[i].date_abs.jour  ecrire
                   stg[i].date_abs.mois ecrire
                   stg[i].date_abs.annee
                   }
                    Fin pour

               TRI – Examen de Passage                                             Session Juillet 2016 /  Variante1    6/16




                                                www.itlearning-settat.com

                                 Email: admission@itlearning-settat.com
                                                 Tél.:0661077812
   1341   1342   1343   1344   1345   1346   1347   1348   1349   1350   1351