RÉPUBLIQUE TUNISIENNE |
Épreuve pratique d’informatique |
|
Durée : 1h |
Coefficient : 0.5 |
|
Sections : Maths, Sciences |
Date : 19 mai 2016 |
Important :
1) Une solution modulaire au problème est exigée. 2) Enregistrez au fur et à mesure votre programme dans le dossier Bac2016 situé à la racine C: en lui donnant comme nom votre numéro d’inscription (6 chiffres). |
Soit Tl un tableau contenant des adresses E-mail sous la forme "utilisateur@serveur".
Une adresse E-mail est valide si elle vérifie les conditions suivantes :
● L’adresse ne doit pas dépasser 25 caractères.
● L’adresse doit commencer par une lettre.
● L’adresse doit contenir le signe "@".
On se propose d’écrire un programme Pascal qui permet :
● de remplir un tableau T1 par N adresses E-mail (avec 5 < N < 10).
● d’extraire sans redondance, dans un deuxième tableau T2, les noms des serveurs, à partir des adresses E-mail du tableau T1.
● d’afficher le résultat obtenu.
Pour cela, on donne l’algorithme du programme principal suivant :
0) Début NomServeur
1) Répéter
Ecrire ("Donner le nombre d’adresses e-mail : ")
Lire(N)
Jusqu’à N Dans [5..10]
2) Pour i de 1 à N faire
Répéter
Ecrire ("Donner une adresse e-mail : ")
Lire (T1[i])
Jusqu’à (Long(T1[i]) ≤ 25) et (Majus(T1[i][1]) Dans ["A".."Z"])
et (Position("@",T1[i]) Dans [2..Long(T1[i]-1])
Fin Pour
3) Proc Serveurs (N, T1, T2, N2)
4) Proc Afficher (N2,T2)
5) Fin NomServeur
Travail demandé :
a. Traduire l’algorithme NomServeur en un programme Pascal et ajouter les déclarations nécessaires.
b. Transformer la séquence n°2 en un module et apporter les modifications nécessaires dans le programme principal.
c. Développer le module Serveurs qui permet d’extraire sans redondance, à partir du tableau T1, les noms des serveurs dans un deuxième tableau T2.
d. Développer le module Afficher qui permet d’afficher le tableau T2.
Grille d’évaluation :
Questions |
Nombre de points |
a. Traduction de l’algorithme NomServeur en Pascal + b. Transformation de la séquence n°2 en un module + c. Développement du module Serveurs. d. Développement du module Afficher. |
6 + 1
|