BTS 1 IDA

LANGAGE PASCAL

NOM :
 Langage Pascal

INTRODUCTION

Un programme informatique se compose d’une série d’instructions, qui sont

exécutées successivement par l’ordinateur. Lors de la création d’un programme, il est
nécessaire d’y inclure les instructions correspondant à la tâche qu’on souhaite voir
accomplie par l’ordinateur. Le processus consistant à définir les instructions, devant
être exécutées par l’ordinateur, se nomme programmation.

Beaucoup de langages de programmation sont apparus au fil des années en

commençant par les langages intimement liés à la machine (langage machine et
assembleur), viennent après les langages dits évolués : interprétés tels que Basic et
compilés tels que Pascal et C.

Langage Pascal

Le langage Pascal est un langage de programmation de haut niveau. Il a été conçu par
le professeur WIRTH à Zurich en 1970 comme une aide à l’enseignement de la
programmation structurée.

Langage C

Le langage C a été créé en 1972 par Denis RITCHIE avec un objectif relativement
limité : écrire un système d’exploitation (UNIX). Mais, ses qualités opérationnelles
l’ont très vite fait adopté par une large communauté de programmeurs.
1
 Langage Pascal

L’enseignement de l’informatique se répand de plus en plus dans les

établissements scolaires et pour toutes les options, à l’université, aux écoles
d’ingénieurs, plus récemment dans les lycées et collèges et même dans les écoles
primaires privées.

En particulier, l’enseignement de l’algorithmique et de la programmation est,

et reste toujours un passage obligatoire pour la formation des futurs informaticiens.
Malgré l’apparition d’autres systèmes de programmation très évolués et reposant sur
la programmation orientée objets, ceux-ci restent liés aux langages de programmation
de base tels que Pascal et C.

2
 Langage Pascal

chapitre I : ÉLÉMENTS DE BASE D’UN

PROGRAMME EN PASCAL

I- Structure d’un programme

Un programme PASCAl se compose des éléments suivants :

1- En-tête qui se compose du mot réservé PROGRAM suivi d’un identificateur du

nom du programme, suivi du point virgule ‘ ;’. Exemple : PROGRAM Operations
;
2- 2- Préambule déclaratif qui comporte :

 La déclaration des bibliothèques utilisées, précédée par le mot réservé USES.

Les identificateurs des bibliothèques sont séparés par des virgules et la liste
est terminée par un point virgule ‘;’.

Exemple : USES Crt, Graph, Dos ;

 La déclaration des identificateurs de types de données, définis par

l’utilisateur, précédée par le mot réservé TYPE.

Exemple : TYPE Nombre = 0..99 ;

 La déclaration des identificateurs de constantes, précédée par le mot réservé

CONST.

Exemple : CONST Pi = 3.14 ;

3
 Langage Pascal

 La déclaration des identificateurs de variables, précédée par le mot réservé

VAR.

Exemple : VAR A : INTEGER ;

3- Définition des différents sous-programmes (voir chapitre des

sousprogrammes).

4- Définition du bloc principal du programme : ce bloc commence par le mot

réservé BEGIN suivi d’une séquence d’instructions (séparées par des points
virgules ‘ ;’) et se termine par le mot réservé END suivi du point ‘.’.

STRUCTURE GENERALE
program nomprog ;
{ Définition éventuelle des constantes et des types; cette partie est expliquée au chapitre 7
}
{ Début de la déclaration des variables }
var
nomvar1, nomvar2, … : type1 ;
nomvar3 : type2 ;
… { Il peut y en avoir autant qu'on veut }
{ Fin de la déclaration des variables }
{ Début du corps du programme }
begin
instruction1 ;
instruction2 ;
… { Il peut y en avoir autant qu'on veut }
end.
{ Fin du programme }
4
 Langage Pascal

Exemple

II- Types de données

II-1. Variables et constantes

II-1.1 Les variables

5
 Langage Pascal

On appelle variable, un emplacement mémoire dans lequel est codée une

information que l’on peut modifier et utiliser grâce à un identificateur. Toute variable
doit être déclarée avant d’être utilisée.

Syntaxe :

Exemple :

Variables globales et variables locales

Les variables déclarées dans la partie déclaration du programme sont dites globales.
Les variables déclarées dans la partie déclaration d’un sous-programme sont dites
locales.
Les variables globales sont connues par tous les sous-programmes, tandis que les
variables locales sont connues seulement par le sous-programme dans lequel elles
sont déclarées.
II-1.2 Les constantes

Contrairement à une variable, une constante ne peut être modifiée (théoriquement).

6
 Langage Pascal

Syntaxe :

Remarque

Contrairement aux variables, il n'est nullement besoin de spécifier le type de la

constante. On peut tout de même le faire, en utilisant le double point, comme pour les
variables.

Exemple :

II-2. Les types de base

Mémoire
Type Description Intervalle Exemples
requise
Shortint Entiers courts -128 à 127 -125; 0; 32 1 octet
Integer Entiers "relatifs" -32 768 à 32 767 -30 000; 421; 2 octets
-2147483648 à -12 545 454; 3
Longint Entiers longs 4 octets
2147483647 257
7
 Langage Pascal

Entiers sur 1 Bit

Byte 0 à 255 12; 157 1 octet
(Byte ou Octet)
Entiers sur 2 Bits
Word 0 à 65 535 27; 4 589 2 octets
(Word ou Mot)
3.1415;
Real Nombres réels 2.9E-39 à 1.7E38 6 octets
789.457851
Nombres décimaux 3.1415926; 178
-45 38
Single 1.5E à 3.4E 4 octets
(simple précision) 925.455678
Nombres décimaux 54.5899; 9 897
Double 5E-324 à 1.7E308 8 octets
(double précision) 669
Mémoire
Type Description Intervalle Exemples
requise
651.45568959
3.14159265458;
Extended Nombres réels 3.4E-4932 à 1.1E4932 10 octets
9.81
Comp Entier -9.2E18 à 9.2E18 -271; 6 548 8 octets
Boolean logique sur 1 octet false ou true false; true 1 octet
256 caractères au
Chaîne de 'Hello!';
String maximum (0 à 256 octets
caractères 'Allezvous bien ?'
255)
Chaîne de n n caractères String[6]>'Hello!'
String[n] n octets
caractères maximum
1 caractère
Char 1 caractère 'R' 1 octet
maximum
8
 Langage Pascal

II-3. Créer un type de données

Il est possible au programmeur de créer ses propres types. Les types doivent être
déclarés avec le mot-clef Type à fortiori avant la déclaration des variables.

Exemple

Type matrice = Array[1..10,1..10] of integer;

Définit un type nommé matrice pour représenter une matrice carrée d’ordre 10.

Type énuméré

Dans la déclaration d’un type énuméré, il faut énumérer toutes les valeurs de ce type.

Syntaxe :

type nom_du_type = (identificateur_1, identificateur_2,.., identificateur_n)

Exemple :

type jour = (lundi, mardi, mercredi, jeudi, vendredi, samedi, dimanche) ;

9
 Langage Pascal

Type intervalle

Syntaxe :

type nom_du_type = début_de_l_intervalle..fin_de_l_intervalle

Exemple :

Déclare un type nommé age dont les valeurs sont des entiers compris entre 1 et 150.

III- Opérateurs et expressions

Les expressions sont composées d’opérateurs et d’opérandes. La plupart des

opérateurs sont binaires, c’est à dire qu’ils mettent en œuvre deux opérandes (exemple
A+B). Les opérateurs à un opérande sont dits unaires (exemple –A).
Dans les expressions plus complexes, l’existence de règles de priorité permet
d’éliminer toute ambiguïté dans l’ordre de réalisation des opérations.
10
 Langage Pascal

Table de priorité des opérateurs

Ordre Opérateurs Ordre Opérateurs

0 (,[ 5 +,-
1 OR 6 *, /, DIV, MOD
2 AND 7 (+),(-)
3 NOT 8
4 < , >, <= , >= , <> , = 9

Remarque : (+) et (-) deux opérateurs unaires.

Les trois règles fondamentales de priorité des opérateurs sont les suivantes :

1- Un opérande placé entre deux opérateurs de priorités différentes sera lié à celui
possédant la priorité la plus élevée.

2- Un opérande placé entre deux opérateurs de même priorité sera lié à celui qui
se trouve à gauche.

3- Les expressions contenues entre parenthèses sont évaluées d’abord afin de

traiter leur résultat comme un seul opérande.

Dans une expression arithmétique, les opérateurs sont les opérateurs arithmétiques
(+,-,*, /, DIV, MOD).

Un opérande peut être :

- Un nom de variable ou de constante numérique.

11

- Une constante numérique.

 Langage Pascal

- Un nom de fonction de type numérique tel que COS, SIN, etc.

Une expression logique simple est une comparaison entre deux expressions
arithmétiques. Les opérateurs de comparaison sont =, <>, <, >, <=, >=.

Une expression logique est la composée d’expressions logiques simples par les
opérateurs logiques :

- OR et AND opérateurs logiques binaires, OR pour la disjonction et AND pour la

conjonction.

- NOT opérateur unaire, NOT opérateur de négation.

- IV- Instructions simples

IV-1. Instructions d’entrée

Une instruction d’entrée permet de lire une donnée à partir du clavier.

Syntaxe :

Read (V1, V2,…., Vn) Où Vi est une variable de tout type simple (sauf énuméré)
ou de type chaîne de caractères.

ReadLn (V1,V2,...Vn) même effet que Read, mais il faut taper la touche Entrée
après l’entrée de la donnée. L’instruction ReadLn (sans argument) attend la
frappe de la touche Entrée au clavier.
12
 Langage Pascal

Exemple :

IV-2. Instructions de sortie

Une instruction de sortie permet l’affichage sur l’écran des valeurs correspondantes
aux arguments considérés.

Syntaxe

Write (val1,val2,…,valn) Où vali est une valeur d’une donnée constante ou

variable (sauf type énuméré), une constante chaîne de caractères, ou une valeur
d’une expression.

WriteLn(val1,val2,…valn) même effet que Write, mais le curseur passe à la ligne

suivante après l’affichage. Exemple : write(‘salut ’,nom) ;
13
 Langage Pascal

Remarque :

• Une constante chaîne de caractères est mise entre apostrophe. Une apostrophe
comprise dans une chaîne doit être dédoublée.

• L’instruction WriteLn (sans arguments) permet un saut de ligne.

EXEMPLE

IV-3. Instruction d’affectation

Cette instruction permet de transcrire une valeur dans une variable. Le symbole
d’affectation est ‘ := ’

Syntaxe : <Var> := <Val> ;

14
 Langage Pascal

Où la variable <Var> peut être de tout type et la valeur <Val> peut être une valeur
constante, la valeur d’une donnée constante ou variable, la valeur d’une fonction, ou
le résultat d’une expression.

Exemple :

V-Enoncé des exercices

Exercice 1
Ecrire un programme qui permet d’afficher le message suivant : mon premier
programme.
15
 Langage Pascal

Réponse

Exercice 2
Ecrire un programme qui demande à l'utilisateur les valeurs de 2 entiers x et y, qui
permute leurs valeurs et qui les affiche.

Réponse

16
 Langage Pascal

Exercice 3
Ecrire un programme qui échange 3 entiers.
Réponse

Exercice 4
Ecrire un programme qui demande à l'utilisateur les coordonnées de 2 points distincts
du plan et qui affiche les coordonnées du point milieu.

Exercice 5
Ecrire un programme qui demande à l'utilisateur une valeur pour U0, r et n et qui
affiche la nième valeur de la suite arithmétique définie par U0 et Un+1 = Un + r. (On
rappelle la propriété : Un = U0 + n.r ).
17
 Langage Pascal

CHAPITRE II : STRUCTURES DE TRAITEMENT

ALTERNATIVES ET ITÉRATIVES

Les instructions structurées sont des instructions composées d’autres instructions

devant être exécutées sous certaines conditions (instructions conditionnelles) ou
répétées plusieurs fois (instructions répétitives).

I- Instructions conditionnelles

 Instruction IF…Then

Syntaxe :

Si <Cond> est vraie, le bloc d’instructions <Bloc> sera exécuté, sinon il sera ignoré.

Cette instruction représente l’alternative simple (instruction de choix unaire).

18
 Langage Pascal

Exemple :

19
 Langage Pascal

 Instruction IF…THEN…ELSE

Syntaxe :

Si <Cond> est vraie, le bloc d’instructions <Bloc1> sera exécuté et le bloc

d’instructions <Bloc2> sera ignoré, sinon c’est le bloc d’instructions <bloc2> qui sera
exécuté et le bloc d’instructions <Bloc1> sera ignoré.

Cette instruction représente l’alternative complète (instruction de choix binaire).

20
 Langage Pascal

Exemple :

Remarque : la clause ELSE ne doit pas être précédée par un point virgule ‘ ;’.

 Instruction CASE

L’instruction CASE est constituée d’une expression de type scalaire, représentant le

sélecteur, et d’une liste de blocs d’instructions ; chacun étant précédé par une étiquette
21
 Langage Pascal

de cas de même type que le sélecteur. Le bloc d’instructions exécuté est celui dont
l’étiquette de cas correspond à la valeur courante du sélecteur.

Une étiquette de cas est constituée de tous nombres de constantes ou d’intervalles,

séparés par des virgules et terminés par le symbole ’ :’.

Syntaxe :

CASE <Sélecteur> OF
Val1 : <Bloc1> ;
Val2 : <Bloc2> ;
..........................
Valn : <Blocn> ;
ELSE <Bloc>;
END;

22
 Langage Pascal

Exemple :

23
 Langage Pascal

II- Instructions répétitives

1- La Structure Tant que : While() …. do

Ce type de boucle, évalue une condition avant d'exécuter des instructions

Syntaxe :

Exemple :

2- La Structure Répéter - jusqu’à : Repeat …. until

Cette boucle effectue les instructions placées entre deux bornes (repeat et until) et
évalue à chaque répétition une condition de type booléenne avant de continuer la
boucle pour décider l'arrêt ou la continuité de la répétition
24
 Langage Pascal

Syntaxe :

Exemple :

3- La Structure pout: For …. do

Cette instruction permet de décrémenter une variable à partir d'une valeur supérieur jusqu'à une
valeur inférieur etd'exécuter une ou des instructions entre chaque décrémentation. S'appliquent ici
les mêmes remarques que précédemment 25
 Langage Pascal

Syntaxe 1 :

Exemple :

Syntaxe 2 :

26
 Langage Pascal

Exemple :

III- Enoncé des exercices

Exercice 6
Ecrire un programme qui échange les contenus de 2 données si elles sont de signes
contraires.

Exercice 7
Ecrire un programme qui échange les contenus de 2 données si elles sont de signes
contraires, sinon, il met leur produit dans la première donnée et leur somme dans la
deuxième

Exercice 8
Ecrire un programme qui, étant donné un mois et son premier jour, affiche le premier
jour du mois suivant.

Exercice 9
Ecrire un programme qui calcule la somme des N premiers termes positifs.
27
 Langage Pascal

Exercice 10
Ecrire un programme qui calcule la somme des N premiers termes positifs impairs.

Exercice 11
Ecrire un programme qui calcule la somme des N premiers termes positifs pairs non
multiples de 3.

Exercice 12
Ecrire un programme qui calcule la somme 1/2 + 1/4 + 1/8 +…+1/2 n (n Є N*).

Exercice 13
Ecrire un programme qui calcule la somme 1+1/2-1/4+ 1/8-1/16+…±1/2n (n Є N*).

Exercice 14
Ecrire un programme qui donne la plus grande valeur inférieure à 1000 de la somme
1+2+4+8+…+2N.

Exercice 15
Ecrire un programme qui calcule la somme 1+x+x2+…+xn (x réel et n entier).

Exercice 16
Ecrire un programme qui calcule la somme, le produit et la différence de deux
données numériques.

Exercice 17
Ecrire un programme qui retourne le code d’une donnée de type Caractere.
Exercice 18
Ecrire un programme qui calcule le salaire net d’un employé, sachant que celui ci a
assuré un certain nombres d’heures de travail à un prix fixe par heure, et que
28
 Langage Pascal

l’employeur doit réduire de son salaire des charges qui sont calculées avec un
coefficient donné.

Exercice 19
Ecrire un programme qui permet de reprendre l’exercice précédant en considérant
que l’employé a assuré des heures normales, des heures à 25% et des heures à 50%.

Exercice 20
Ecrire un programme qui retourne si une donnée numérique est paire ou impaire
(utiliser le reste de la division par 2).

Exercice 21
Ecrire un programme qui permet de lire trois données numériques et retourne si la
troisième donnée est la somme des deux autres ou pas.

Exercice 22
Ecrire un programme qui, à partir du salaire brut d’un employé, détermine l’impôt à
payer sachant que les règles de calcul des impôts sont comme suit :

salaire brut(SB) l’impôt à payer

SB<1500 0%
1500<=SB<3000 10% du SB
3000<=SB<5000 450+30%(SB-3000)
SB>=5000 750+40%(SB-5000)
Exercice 23
Ecrire un programme qui fournit les racines de l’équation Ax2+Bx+C=0.

Exercice 24
Ecrire un programme qui, étant donnée une date (jour, mois, année), affiche la date
29

du jour suivant.
 Langage Pascal

Exercice 25
Ecrire un programme qui, étant donnée une date (jour, mois, année), affiche la date
du jour précédent.

Exercice 26
Ecrire un programme qui calcule la somme 5+6+7+….+N (N>=5).

Exercice 27
Ecrire un programme qui calcule le produit des N (N>0) premiers entiers positifs.
Exercice 28
Ecrire un programme qui calcule la somme 1+1/2+1/4+1/6+…+1/2N (N>0).

Exercice 29
Ecrire un programme qui échange les contenus de trois données numériques si leur
somme est paire, sinon il met la somme des trois dans la première donnée, leur produit
dans la seconde et la valeur zéro dans la troisième.

30
 Langage Pascal

CHAPITRE III : LES TABLEAUX

I- Définition

Un tableau est une variable se composant de plusieurs éléments de même type.

Exemple :
10 0 2 -1
Tableau de 4 entiers

a b q w h d
Tableau de 6 caractères

On distingue les tableaux à une dimension (vecteur) et les tableaux à deux dimensions
(les matrices)

II- Déclaration :
Soit Tab un tableau destiné à contenir 5 entiers : Tab sera déclarée :

Var Tab : Array [ 1..5] of integer ;

Variable Nom du 1..5 est le nombre d’éléments Type des éléments

tableau du tableau que doit contenir le
tableau
31
 Langage Pascal

Syntaxe :

TYpe Nomtableau : ARRAY [Min.. Max] OF type_élément ;

Var Tab : Nomtableau ;

Exemple :

III- Accès à un élément d’un tableau:

On accède à un élément d’un tableau, en indiquant le n° de la case qui le contient
(indice).

Nomdutableau[indice] ;
-2 0 11 120 0 -2
Exemple : T1 2 3 4 5 6
32

Indice
 Langage Pascal

 T[1] := -2 ; T[2] := 0 ; T[3] : = 11 ; T[4] : = 100

 Si j := 3 ;

T[j] := 11 ;

IV- La lecture et l’ecriture

La lecture permet le remplissage du tableau en utilisant l’indice.

Var X : array [1..5] of integer ;

Begin
Write (‘Donner le 1er element: ’);
Readln(X[1]);
Write (‘Donner le 2em element: ’);
Readln(X[2]);
Write (‘Donner le 3em element: ’);
Readln(X[3]);
Write (‘Donner le 4em element: ’);
Readln(X[4]);
Write (‘Donner le 5em element: ’);
Readln(X[5]);
End.

En utilisant une variable indice i qui varie de 1 à 5, on peut utiliser une boucle FOR.

For 1 := 1 To 5 Do
Begin
Write(‘Donner le’, i,’em élément’) ;
33

Readln (X[i]) ;
 Langage Pascal

End ;

Exemple :
 Lire un tableau de 20 notes.

34
 Langage Pascal

Ecriture :

Pour afficher le contenu des cases d’un tableau, on utilise un indice pour accéder aux
éléments.

Exercice 30
On dispose de 2 tableaux de même dimension Note et Coef qui contiennent
respectivement les notes d'un étudiant et les coefficients attribués aux matières
enseignées.
Note[i] est la note obtenue dans la matière coef[i].
Ecrire un programme pascal qui permet de calculer la moyenne de l'étudiant.
35
 Langage Pascal

Exercice 31 :
Ecrire un programme qui lit un tableau de 10 caractères et effectue les traitements
suivants selon un menu :
1- Le nombre de voyelles
2- Le nombre d’occurrences d’un caractère
3- Afficher les caractères en horizontale
4- Afficher les caractères en verticale

Exercice 32:
Soit le program suivant :
Const N = 10 ;
Var tab :array [1..N] of integer ;
X,I,j : integer;
Begin
For I := 2 to N do
For j := 1 to i-1 do
If Tab[j] < Tab[i] then
Begin
X := Tab[j];
Tab[j] :=Tab[i];
Tab[i] := x;
End;
End.
Que fait le programme.

36
 Langage Pascal

CHAPITRE IV : NOTION DE
SOUS-PROGRAMMES

I- Introduction

Un sous-programme permet :

• d’éviter d’appliquer à plusieurs endroits d’un programme le même traitement,

même s’il porte sur des objets différents.

• d’appliquer sous forme transportable un traitement dont on prévoit que d’autres

programmes peuvent aussi en avoir besoin.

• de dégager d’un programme des tâches de moindre importance ne laissant dans son
corps que la partie importante de l’algorithme d’où le gain de lisibilité et de
sécurité.
Les sous-programmes en Pascal sont des procédures et des fonctions.

II- Les procédures

Une procédure doit être déclarée dans un programme, ou dans une procédure, avant
le corps du programme (de la procédure) et après les déclarations des variables.

Le nom de la procédure est un identificateur qui, comme les autres déclarations

environnantes, sera local au programme ou à la procédure l’environnant.

La structure d’une procédure est à peu près celle d’un programme, l’en-tête diffère,
la procédure se termine par un point virgule au lieu d’un point.
37
 Langage Pascal

Syntaxe :

Paramètres formels

La déclaration des procédures peut être suivie d’une liste de paramètres entre
parenthèses. Un paramètre formel est destiné à être remplacé, chaque fois que la
procédure est activée, par un autre objet dit paramètre effectif, le plus souvent une
variable, ou le résultat d’une expression, de la procédure appelante.

Syntaxe :

38
 Langage Pascal

Exemple

Paramètres par valeurs et paramètres par adresse

Les objets sont transmis comme données dont la valeur doit être inchangée par la
procédure appelée (on dit qu’on a une lecture pure).
39
 Langage Pascal

Les objets sont transmis comme résultat dont la valeur doit être calculée par la
procédure appelée et transmise à la procédure appelante (on dit qu’on a une écriture
pure).

Les objets sont transmis comme données qui doivent être modifiées par la procédure
appelée (on dit qu’on a une lecture-écriture).

En Pascal, la transmission des paramètres se fait de deux manières :

• Transmission par valeur (lecture pure).

• Transmission par adresse (écriture pure, lecture-écriture).

On indique les paramètres transmis par adresse, précédés par le mot réservé Var, les
autres ne sont précédés par aucune chose.

III- Les fonctions

Une fonction en Pascal se comporte comme une procédure sauf que la fonction doit
fournir un résultat, elle a donc un type.

Syntaxe :

40
 Langage Pascal

Dans le corps de la fonction, on doit trouver quelque part l’affectation d’une valeur à
l’identificateur de la fonction.

Exemple :

41
 Langage Pascal

IV- Fonctions prédéfinies

42
 Langage Pascal

V- Enoncé des exercices

Exercice 33
Ecrire une fonction paramétrée qui retourne si un nombre donné est premier ou non.

Exercice 34
Ecrire une fonction paramétrée qui retourne si un nombre donné est parfait ou non.

Exercice 35
Ecrire une fonction paramétrée qui retourne si deux nombres donnés sont amis ou
non.
43
 Langage Pascal

Exercice 36
Ecrire une fonction paramétrée qui retourne l’inverse d’un nombre entier donné.

Exercice 37
Ecrire une fonction qui permet de calculer le factoriel d’un nombre donné.

Exercice 38
Ecrire une fonction qui permet de calculer la puissance d’un entier donné.

Exercice 39
Ecrire une fonction qui fournit le nombre de chiffres d’un entier donné.

Exercice 40
Soit un programme qui visualise un menu composé de trois rubriques : Hors d’œuvre,
plat chaud et dessert.
Ecrire une procédure qui permet d’effectuer, à chaque fois, un choix exclusif.

Exercice 41
Ecrire une procedure paramétrée, qui permet l’échange des contenus de deux
paramètres formels par valeur A et B. Appeler cette procédure dans un programme
principal. On écrira les résultats dans le corps de la procédure, et dans le programme
44

principal.
 Langage Pascal

Exercice 42
Ecrire une procédure qui affiche tous les nombres premiers qui sont compris entre 1
et 200.

Exercice 43
Ecrire une procédure qui affiche tous les nombres parfaits qui sont compris entre 1 et
200.
Exercice 44
Ecrire une procédure qui permet d’afficher tous les diviseurs d’un entier N ainsi que
leur nombre.

45
 Langage Pascal

Exercice 45
Affichez un triangle isocèle formé d'étoiles sur N lignes (N est fourni au clavier).

Exemple : N=8
*
***
*****
*******
*********
***********
*************
***************

III- Enoncé des exercices

Exercice 46
Ecrire une procédure qui affiche les nombres négatifs d’une liste réelle.

Exercice 47
Ecrire une procédure qui met à zéro la diagonale d’une matrice carrée.

Exercice 48
Ecrire une procédure qui affiche l’occurrence d’existence d’un nombre réel dans une
liste de nombres réels.
46
 Langage Pascal

Exercice 49
Ecrire une procédure qui met les éléments négatifs d’une liste à gauche et les éléments
positifs à droite de la liste.

Exercice 50
Ecrire une procédure qui classe une liste de notes de la plus petite à la plus grande.

Exercice 51
Etant donné N étudiants, leurs notes correspondantes à M matières et leur moyenne.
Ecrire une procédure qui affiche à côté de chaque étudiant son classement.

Exercice 52
Un palindrome est un mot, ou une phrase, lisible indifféremment de la gauche vers la
droite ou inversement. Ecrire une fonction qui retourne si une chaîne de caractères est
un palindrome ou non.

Exercice 53
Ecrire une fonction qui retourne la fréquence d’occurrence d’un mot dans une phrase.

Exercice 54
Ecrire une procédure qui enlève tous les blancs au début d’une phrase et qui laisse un
seul blanc entre les différents mots de la phrase.
47
 Langage Pascal

Exercice 55
Soit un nombre entier positif N. Ecrire une fonction qui donne son équivalent en
binaire

48