2 Exercices en Turbo Pascal FENNI SALAH ©® 1992 Le présent manuel est conforme
2 Exercices en Turbo Pascal FENNI SALAH ©® 1992 Le présent manuel est conforme au programme d'informatique de la 4ème année de l'enseignement secondaire relatif aux sections : Sciences Informatiques, Mathématiques, Sciences Expérimentales et Techniques. Ces exercices sont assez variés et tiennent compte des différents niveaux des élèves. 3 Exercices en Turbo Pascal FENNI SALAH ©® 1992 LES STRUCTURES SIMPLES Exercice 1 Compléter le tableau suivant par les valeurs finales des variables indiquées. Instructions Valeurs A 6 + 2 * 5 div 3 - 10 A = ………………………….………………… B (5>2) OU (8<8) ET Non (6=6) B = …………………………………….……… X Tronc (10.5) X = ……………………………….…………… Y Arrondi (10.5) Y = ………………………………….………… W Aléa(6) + 4 W = ……………………………..…………… Valeur ("0025.38", Z, E) Z = …………………………….……………… E = ……………………………….…………… L Long (Sous_Chaîne (ch, 1, 0)) L = …………………………….……………… P Pos (Majus ("a"), "PASCAL") P = …………………………………………… Ch "information" Efface (Ch, Long (Ch)-1, 3) Ch = ………………………………………… Exercice 2 a) Les variables N, P et Q sont entières et contiennent respectivement les valeurs 5, 7 et 3. Les expressions suivantes sont-elles correctes. Si oui, donnez leur type et leur valeur. • N mod P * Q • N mod P div Q • N = P Or N <= Q • SUCC ('N' + 'P') b) La variable C est de type caractère et contient la valeur 'e'. Les expressions suivantes sont- elles correctes. Si oui, donnez leur type et leur valeur. • PRED (C) + 'e' • ORD (C) + 2.5 • CHR (ORD (C) - 32) • CHR (SUCC (ORD (C))) Exercice 3 Soient les déclarations Pascal suivantes : VAR A: Real; C: Char; D: String; E: Boolean; T: Array [1..20] of Integer; Dans la case de chacune des affectations suivantes écrites en Pascal, mettre V si l'opération est permise et F sinon. A := 3E+2 ; E := (C >= 'C') ; C := upcase ('2') ; T [1] := -8 ; D := '3' + '2' ; A := T [1] DIV 2 ; C := D ; T [5] := T [1] / 2 ; 4 Exercices en Turbo Pascal FENNI SALAH ©® 1992 Exercice 4 Soient les déclarations suivantes, en Pascal : Type jour_semaine = (lun, mar, mer, jeu, ven, sam, dim) ; Const Nom = 'ali' ; Var Test : boolean ; A, B : integer ; Jour : jour_semaine ; Pour chaque opération de lecture ou d'écriture, mettre V si l'opération est possible et F dans le cas contraire. [ ] Readln (A) ; [ ] Readln ('A') ; [ ] Readln (A+B) ; [ ] Readln (45) ; [ ] Readln ('A =', A); [ ] Readln (Nom) ; [ ] Readln (Test) ; [ ] Readln (Jour) ; [ ] Writeln (Jour) ; [ ] Writeln ('A = ', A) ; [ ] Writeln (A:6:2) ; [ ] Writeln (45) ; [ ] Writeln (5 mod 7 div 2) ; [ ] Writeln (Nom[2]) ; [ ] Writeln (A+B, Nom, Test); Exercice 5 Ecrire un algorithme puis la traduction en Pascal d'un programme intitulé Sortie_inverse, qui saisit trois nombres dans un ordre donné et les affiche dans l’ordre opposé à l’entrée. Exercice 6 Ecrire un algorithme puis la traduction en Pascal d'un programme intitulé Cylindre, qui calcule et affiche le volume d'un cylindre après saisie son rayon R et sa hauteur H. Exercice 7 Ecrire un algorithme puis la traduction en Pascal d'un programme Surface_Rectangle, qui calcule la surface d'un rectangle de dimensions données et affiche le résultat sous la forme suivante : "La surface du rectangle dont la longueur mesure .... m et la largeur mesure .... m, a une surface égale à .... mètres carrés". Exercice 8 Ecrire un algorithme puis la traduction en Pascal d'un programme Piscine, qui lit les dimensions d'une piscine, et affiche son volume et la quantité d'eau nécessaire pour la remplir. Exercice 9 Ecrire un algorithme puis la traduction en Pascal d'un programme Trapèze, qui lit les dimensions d'un trapèze et affiche sa surface. Exercice 10 Ecrire un algorithme puis la traduction en Pascal d'un programme intitulé Permut, qui fait la permutation de deux variables A et B. Exercice 11 Proposer une marche à suivre qui fait, une permutation circulaire à droite, des valeurs de trois variables A, B et C. Par exemple : à partir de (A, B, C) = (10, 25, 4), on passe à (A, B, C) = (4, 10, 25). Exercice 12 Proposer une marche à suivre qui fait la permutation de deux variables numériques X et Y, sans faire appel à aucune variable intermédiaire. Exercice 13 Ecrire un algorithme puis la traduction en Pascal d'un programme intitulé Division, qui fait calculer et afficher le quotient et le reste de la division euclidienne de A par B. Exercice 14 Ecrire un algorithme puis la traduction en Pascal d'un programme qui lit une température en degrés Celsius et affiche son équivalent en Fahrenheit. 5 Exercices en Turbo Pascal FENNI SALAH ©® 1992 Exercice 15 Ecrire un algorithme puis la traduction en Pascal d'un programme permettant de déterminer et d'afficher la conversion en mile marin d'une distance mesurée en kilomètre. Exercice 16 Ecrire un algorithme puis la traduction en Pascal d'un programme qui permet de convertir et d'afficher en octets, kilo octets, méga octets et giga octets un nombre donné en bits. Exercice 17 Ecrire un algorithme puis la traduction en Pascal d'un programme, qui convertit en heures, minutes et secondes, une durée T donnée en secondes. Il affiche le résultat sous la forme digitale comme celle d'une montre électronique (hh : mn : ss). Exercice 18 Ecrire un algorithme puis la traduction en Pascal d'un programme, qui conjugue un verbe du premier groupe au futur simple. On ne traite pas les verbes irréguliers. Exercice 19 Ecrire un algorithme puis la traduction en Pascal d'un programme, qui calcule et affiche, l'intérêt et la valeur acquise par une somme placée en épargne pendant 5 ans à intérêt simple. Exercice 20 On sait qu'avec un réservoir de L litres, une voiture a parcouru Y km. Ecrire un algorithme puis la traduction en Pascal d'un programme, qui fait lire les données nécessaires et fait calculer et afficher le taux de consommation aux 100 km de cette voiture. Exercice 21 Ecrire un algorithme puis la traduction en Pascal d'un programme, qui affiche la résistance équivalente à trois résistances R1, R2, R3. - si les résistances sont branchées en série : Rser = R1+R2+R3 - si les résistances sont branchées en parallèle : 1/Rpar = 1/R1 + 1/R2 + 1/R3 Exercice 22 On se propose de saisir un entier N de trois chiffres non nuls, de déterminer et d'afficher tous les nombres qui peuvent être formés par les chiffres de N. Exemple : pour N=427 Les nombres formés par les chiffres de N sont : 427, 472, 724, 742, 247, 274. Exercice 23 Ecrire un algorithme puis la traduction en Pascal d'un programme, qui fait entrer deux entiers A et B et fait calculer et afficher leur inf et leur sup. Utiliser une formule mathématique donnant directement le résultat. Exercice 24 On se propose d'écrire un programme intitulé IMAGE qui calcule le nombre de pixels et le poids d'une image numérique en méga octet (MO), d'une dimension (hauteur, largeur) exprimées en pouces et d'une résolution en dpi (points par pouce). NB. - La résolution indique le nombre de points sur une unité de longueur de l'image. - Le nombre de pixels dans une image = hauteur * résolution* longueur *résolution - L'image est codée en 24 bits/pixel ou 48 bits/pixel c'est à dire 8 ou 16 bits par canal R (rouge), V (vert) et B (bleu). - Le nombre total d'octets dans l'image (poids) = Nombre de pixels * nombre d'octets par pixel. Exercice 25 Écrire en Pascal le programme intitulé DATE, qui initialise la date maintenue par le système d'exploitation, en utilisant la procédure SetDate (…) de la bibliothèque WinDos. 6 Exercices en Turbo Pascal FENNI SALAH ©® 1992 Exercice 26 Ecrire un programme Pascal, qui calcule et affiche la distance DIST entre deux points A et B du plan dont les coordonnées (XA, YA) et (XB, YB) sont entrées au clavier comme entiers. Exercice 27 a) Ecrire un programme Pascal qui calcule le prix TTC d'un article à partir du prix net et du pourcentage de TVA à ajouter. Utiliser la formule suivante : b) Ecrire un programme Pascal qui calcule le prix net d'un article à partir du prix TTC et du pourcentage de TVA qui a été ajoutée. (Déduire la formule du calcul de celle indiquée ci-dessus) Exercice 28 Deux trains, distants de 60 km, roulent l'un vers l'autre sur le même itinéraire. • Le train A avance à une vitesse de 70 km/h. • Le train B avance à une vitesse de 55 km/h. Ecrire un programme intitulé RENCONTRE qui permet de calculer le temps où les deux trains vont se rencontrer? 7 Exercices en Turbo uploads/Litterature/ exercices-pascal-fenni-2021.pdf
Documents similaires










-
30
-
0
-
0
Licence et utilisation
Gratuit pour un usage personnel Attribution requise- Détails
- Publié le Aoû 26, 2021
- Catégorie Literature / Litté...
- Langue French
- Taille du fichier 1.1248MB