exo du pascal

Pages: 4 (793 mots) Publié le: 7 janvier 2014
Série d’exercice
Corrigé
Préparé par : Zouari Lazhar
Professeur d’enseignement secondaire
Lycée El-Omrane Superièur
2006 / 2007

1

Série d’exercice

PROF : ZOUARI LAZHAR

Exercice N°01
Ecrire un programme en Pascal qui permet de convertir un temps donné en secondes en heures, minutes et secondes.
Exemple : Si temps = 3674 alors le programme affichera : 3674 s = 1 h : 1 min : 14s
Exercice N° 02
Soit l’algorithme suivant :
0) Début inconnu
1) Ecrire (˝Tapez un caractère : ˝), lire (c1)
2) Si ( (ORD (c1) ≥ 97) et (ORD (c1) ≤ 122) )
Alors c2
Sinon c2
3)
4)
Travail
1.2.
3.
4.

CHR (ORD (c1) – 32)
c1

Fin Si
Ecrire (c2)
Fin inconnu
demandé
Lancer Turbo Pascal
Traduire cet algorithme en Pascal
Que fait cet algorithme ? (Ecrire la réponse commecommentaire à la fin du programme).
Enregistrer votre Travail dans D : qui a comme nom Devoir

Exercice N° 03
Ecrire un programme en Pascal permet de déterminer et d’afficher le successeur et leprédécesseur d’un caractère c
donnée.
Exercice N ° 04
Ecrire un programme en Pascal permet d’afficher le résultat d’une permutation circulaire de droite à gauche de trois
caractères donnés.

C1

C2C3

Exercice N° 05
Ecrire un programme en Pascal qui permet d’extraire puis afficher les chiffres de centaine, dizaine et unité d’un entier
composé de trois chiffres.
Exercices N° 06
Ecrire unprogramme en Pascal qui permet de calculer et d’afficher la distance entre deux points dont les coordonnées
sont données.
Soit les points M (a, b) et N (c, d) ; la distance entre eux est donnée par laformule suivante :

d ( M , N ) = (a − c)² + (b − d )²
Exercice N° 07
Ecrire un programme en Pascal intitulé CAPACITE, qui convertit en Octets, Kilo octets, Mega octets et Giga octets un
nombredonnée en bits.
Exercice N° 08
Soit le schéma électrique suivant :

R1
R3

R4

R2
Ecrire un programme nommé RESISTANCE, qui saisi les valeurs des résistances R1, R2, R3 et R4 puis...
Lire le document complet

Veuillez vous inscrire pour avoir accès au document.

Vous pouvez également trouver ces documents utiles

  • Ses exo
  • Pascal
  • Pascal
  • Moi
  • Pascal
  • pascal
  • Pascal
  • Pascal

Devenez membre d'Etudier

Inscrivez-vous
c'est gratuit !