STRUCTURE DU LANGAGE PASCAL

Un programme Pascal est un texte dont la structure est définie selon la figure suivante:

PROGRAM NomDuProgramme;
 
  { Déclarations }
 
BEGIN
 
  { Déclarations }
 
END.

En première analyse:

  • PROGRAM, BEGIN et END sont des mots clés du langage PASCAL, et sont appelés des mots réservés.
  • NomDuProgramme est un identificateur

Premier petit programme

Prenons comme exemple un petit programme PASCAL qui va afficher sur l'écran la somme de deux nombres obtenus par une lecture au clavier:

ENTETE PROGRAM Addition;
SECTION
DECLARATIVE
VAR
  Somme    : INTEGER;
  Nombre1,
  Nombre2  : INTEGER;
BLOC
D'INSTRUCTIONS
BEGIN
  
  Write ('Premier nombre ? : ');
  ReadLn (Nombre1); { Lecture 1er nombre }
  
  Write ('Deuxième nombre ? : ');
  ReadLn (Nombre2); { Lecture 2ème nombre }
  
  Somme := Nombre1 + Nombre2;
  WriteLn ('La somme vaut: ', Somme);
  
END.

Quelques remarques:

  • Il est facile de déduire de cet exemple la position de la zone utilisée pour les déclarations et celle utilisée pour les instructions.
  • Ses commentaires peuvent être insérés dans le programme au moyen des délimiteurs "{" et "}" ou "(*" et "*)"

Quelques règles de syntaxe

Le pascal n'impose pas un format d'écriture rigide tel que le FORTRAN, le C ou l'ASSEMBLEUR, le programmeur est libre d'insérer des espaces et des fins de lignes dans tout son programme, excepté à l'intérieur des identificateurs et des chaînes de caractères.

Exemple 1 - Excellent

PROGRAM Exemple;
 
BEGIN
 
  WriteLn (
'Bonjour');
  WriteLn ('Au revoir');

END.

Exemple 2 - Ca s'exécute, mais la personne qui devra reprendre le programme ne vous dira pas merci ! :(

PROGRAM Exemple; BEGIN WriteLn ('Bonjour');
WriteLn ('Au revoir'); END.

Exemple 3 - Incorrect (Mais pourquoi ??) 

PROGRAM Exemple;
 
BEGIN
 
  WriteLn (
'Bonjour');
  WriteLn ('Au
  revoir'
);
 
END.

Le format libre du PASCAL implique l'utilisation de séparateurs. En général, le point-virgule (;) est utilisé pour séparer les instructions et les sections principales, tandis que la virgule (,) est utilisée pour séparer les listes d'identificateurs ou paramètres.

PROGRAM Exemple;
 
VAR
{ Introduction des variables }
  Mult,
  Somme  : REAL;
  Entier : INTEGER;
  Reel   : REAL;
 
BEGIN
{ Début du programme }
 
  Write (
'Tapez un nombre entier > ');
  ReadLn (Entier);
{ Lit un nombre entier }
 
  Write (
'Tapez un nombre réel >');
  ReadLn (Reel);
{ Lit un nombre réel }
 
  Somme := Entier + Reel;
{ Calculs }
  Mult := Entier * Reel;
 
  WriteLn (
'Somme:', Somme, ' Produit:', Mult);
 
END.
{ Fin du programme }