Lycée Mahmoud Messadi Nabeul
Vous souhaitez réagir à ce message ? Créez un compte en quelques clics ou connectez-vous pour continuer.
Le Deal du moment : -26%
Bosch BBS8214 Aspirateur Balai Multifonction sans fil ...
Voir le deal
249.99 €

Sujets Bac pratique 2005

Aller en bas

Sujets Bac pratique 2005 Empty Sujets Bac pratique 2005

Message par Admin Mar 24 Fév - 22:50

Vendredi 13mai 2005 (9h)

Ecrire un programme Pascal intitulé Voyelles permettant de déterminer et d'afficher la position de la deuxième voyelle dans un tableau T de N caractères alphabétiques, donné. S'il y a moins que deux voyelles dans T, le programme affichera -1.



Vendredi 13mai 2005 (10h30')

L'algorithme suivant est celui d'une fonction permettant de retourner la position du plus petit élément dans un tableau A de k éléments à partir d'une position p.



0) Def Fn pos_min (A : tab ; p,k : entier) : entier

1) [pm ß p]

Pour i de p+1 à k répéter

Si A[ i ] < A[ pm ]

Alors pm ßi

Fin Si

Fin Pour

2) pos_min ß pm

3) Fin pos_min



Utiliser la fonction pos_min ci-dessus pour écrire un programme Pascal permettant de saisir un tableau T de n réels, de le trier dans l'ordre croissant par la méthode de

"trie par sélection" puis de l'afficher.



Vendredi 13mai 2005 (14h)

Ecrire un programme Pascal intitulé Predsucc permettant de remplir un tableau T par N chiffres compris entre 0 et 9 et d'afficher les éléments de T qui sont encadrés par leurs prédécesseurs et leurs successeurs.

N.B :

- Le premier élément sera affiché s'il est seulement succédé par son successeur.

- Le dernier élément sera affiché s'il est précédé par son prédécesseur.



Samedi 14mai 2005 (9h)

Ecrire un programme Pascal permettant de saisir deux entiers naturels et d'afficher s'ils sont premiers entre eux ou non.

aet b sont dits premiers entre eux, si PGCD (a,b) =1.

Exemple :

Pour a = 7 et b = 4, PGCD (7,4) = 1 donc 7 et 4

sont premiers entre eux.
Indication :

Sachant que PGCD (a,b) = PGCD (b,r), avec r = a mod b. Tant que le reste r est non nul, on remplace a par b et b par r. Le dernier reste r non nul est alors le PGCD des deux nombres.

Samedi 14mai 2005 (10h30')

On propose ci-dessous l'algorithme d'une procédure de tri à bulles :

0) Def Proc TRI_Bulles( Var T:tab ; n :entier )

1) Pouri de1 à n-1 Répéter

Pour j de 1 àn-i Répéter

Si T[ j ] < T[ j+1]

Alors Proc Permut ( T[ j], T[ j+1]) Fin Si

Fin Pour

Fin Pour

2) Fin TRI_Bulles



Remarque :

Le module Permut (a,b) permute le contenu de deux entiers a et b.



Questions :

1. Dans le dossier bac2005situé à la racine C : créer un sous-dossier en lui donnant comme nom le numéro de votre carte d'identité.

2. Ecrire un programme Pascal intitulé Tri permettant de saisir p éléments entiers dans un tableau Vet de faire appel au module Tri_Bulles ci-dessus pour le trier.

3. Sous forme de commentaire, déterminer l'ordre du tri (croissant ou décroissant) accompli par le programme. Enregistrer le programme sous le

nom Tri_V1 dans le dossier créer précédemment.

4. Dans le cas où le tableau V est déjà trié à la fin de la saisie, les parcours effectués par le module Tri_Bulles s'avèrent inutiles. En effet, aucune permutation n'aura lieu au sein de ce module dans ce cas.

Modifier la procédure Trie_Bulles pour tenir compte de cette contrainte et enregistrer votre travail sous le nom Tri_V2.

Admin
Admin

Messages : 65
Date d'inscription : 30/12/2008

https://lmmnabeul.forumactif.org

Revenir en haut Aller en bas

Sujets Bac pratique 2005 Empty Sujets Bac pratique 2005 (I)

Message par Admin Mar 24 Fév - 23:07




Mardi 17 mai 2005 (9h)

Soit la procédure suivante :



Procedure Module ( k : integer ; Var T : Tab ) ; Var j , Temp : integer ;

Begin

J : = k – 1 ; Temp : = T [K] ;

While ( j >= 1 ) AND ( T [ j ] > Temp ) DO

Begin
T [ j + 1 ] : = T [ j ] ;
j : = j – 1 ;
End ;
T [ j + 1] : = Temp ;
End ;

Questions:

1. Ecrire un programme Pascal intitulé Traitement, permettant de saisir N entiers dans le tableau A et d'appeler la procédure Module ci-dessus avec les paramètres effectifs 2 et A.

2. Ecrire sous forme de commentaire le rôle de la procédure Module.

3. Apporter les modifications nécessaires à la procédure Module dans le but d'effectuer un tri sur un tableau T et en tenir compte au niveau de l'appel de la procédure.

Mardi 17 mai 2005 (10h30')

On se propose d'écrire un programme Pascal permettant de saisir une chaîne de caractères Ch et de supprimer les parenthèses, si elles existent, ainsi que leurs contenus.

N.B : on suppose que la chaine contient au maximum deux parenthèses correctement utilisées (une ouvrante et un fermente).

Exemple :

Pour une chaîne Ch = "Lire un entier strictement positif

(N > 0) et l'afficher", le programme retourne la chaîne

" Lire un entier strictement positif et l'afficher"

Mardi 17 mai 2005 (14h)

On se propose de simuler le "jeu dunombre mystérieux", qui consiste à trouver un entier naturel non nul k, générer au hasard par le programme, (k ≤ 100) en un nombre d'essais nb (nb ≤ 5).

A chaque essai, le joueur propose un entier positif p et le programme lui affiche l'un des messages suivants :

· "Proche" ; si l'écart entre p et k est inférieur à 5.

· "Loin" ; si l'écart entre p et k est supérieur ou égale à 5.

· "Bravo vous avez gagné !!" si p=k.

Si le nombre d'essais nb est atteint sans trouver le nombre mystérieux k, le programme affichera alors " Perdu, le nombre cherché est", suivi le nombre k.
Question :

Ecrire un programme Pascal permettant de simuler le jeu dont le principe est ci-dessus mentionné.

Prévoir les contrôles nécessaires pour que le joueur continu à jouer jusqu'à ce qu'il réponde par "N" ou "n" à la question, "Voulez-vous rejouer (O/N) ?" posée à chaque fin du jeu.

Lundi 16mai 2005 (10h30')

L'algorithme suivant est celui d'un programme permettant d'afficher une chaîne de caractères issue du traitement d'un tableau T de n caractères et un tableau V de n chiffres binaires donnés.

0) Début Chaines

1) Ecrire (" n : " ) ; Lire ( n ) ;

2) Pour i de 1 à n Répéter

Lire ( T[ i ] ) Fin Pour

3) Proc Lecture ( V , n )

4) Ecrire ( Fn Mot ( T , V , n ) )

5) Fin Chaines

Questions :

1. Traduire cet algorithme en Pascal.

2. Transformer les séquences 1 et 2 en une procédure

Nommée Saisie et ajouter les contrôles nécessaires

pour que n vérifie la condition 2 ≤ n ≤20.

3. Ecrire la procédure Lecture qui permet de saisir n

chiffres binaires (0 ou 1) dans un tableau V.

4. Ecrire la fonction Mot qui permet de retourner une chaîne de caractères formée par la concaténation des voyelles du tableau T aux quelles correspondent des 1 dans le tableau V.

Exemple : pour les tableaux T et V suivants :

s K E ; a e i R . u

1 0 1 1 1 0 0 1 0 1

Le programme affichera la chaîne "Eau"

Admin
Admin

Messages : 65
Date d'inscription : 30/12/2008

https://lmmnabeul.forumactif.org

Revenir en haut Aller en bas

Sujets Bac pratique 2005 Empty Sujets Bac pratique 2005 (II)

Message par Admin Dim 8 Mar - 15:44



Lundi 16 mai 2005 (9h)

Ecrire un programme Pascal intitulé Insertion permettant d'effectuer sur un tableau T de N éléments (5<N<20), les opérations suivantes :

- Saisir N valeurs entières dans le tableau T

- Insérer l'élément d'indice i à la position p. (p et i sont deux entiers distincts à saisir)
p peut être supérieur à i ou inversement.



Mercredi 18 mai 2005 (9h)

L'algorithme suivant est celui d'un programme permettant de lire un entier m (1 ≤ m ≤ 100), de vérifier et d'afficher s'il est parfait ou non.

Rappelons qu'un entier naturel non nul est dit parfait s'il est égal à la somme de ses diviseurs sauf lui même.



0) Début Parfait

1) Lire (m)

2) S ß 0

Pour i de 1 à m div 2 répéter

Si m mod i = 0

Alors S ß S + i

Fin Si

Fin Pour

3) Mess ß " n'est pas parfait " Si m = S Alors

Mess ß " est parfait " Fin Si

4) Ecrire (m, Mess)

5) Fin Parfait



Questions :

1. Créer un dossier portant le numéro de votre carte d'identité dans le dossier Bac2005 situé à la racine C :

2. Traduire cet algorithme en Pascal.

3. Transformer la séquence 2 en une fonction intitulée Som_div.
4. Transformer le programme Parfait pour qu'il permette de déterminer et d'afficher tous les nombres parfaits compris entre 1 et 1000. Sauvegarder le programme sous le nom Parfait2.

Admin
Admin

Messages : 65
Date d'inscription : 30/12/2008

https://lmmnabeul.forumactif.org

Revenir en haut Aller en bas

Sujets Bac pratique 2005 Empty Re: Sujets Bac pratique 2005

Message par Contenu sponsorisé


Contenu sponsorisé


Revenir en haut Aller en bas

Revenir en haut

- Sujets similaires

 
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum