Langage Pascal/Exercices/Pascal max a b

**Maximum de deux entier**
Leçon : Langage Pascal

Exercices n^o2

Exercices de niveau 15.
Exo préc. :	Bonjour le monde
Exo suiv. :	Sommaire

En raison de limitations techniques, la typographie souhaitable du titre, « Exercice : Maximum de deux entier
Langage Pascal/Exercices/Pascal max a b », n'a pu être restituée correctement ci-dessus.

Cet exercice est très classique. Il faut savoir le refaire sans indication ni doute.

Faites un programme qui donne le maximum de deux entier a et b.

Solution

 var a,b: integer;
 Begin
   write('Entrez un premier nombre : ');
   readln(a);
   write('Entrez un deuxième nombre : ');
   readln(b);

   if a > b then
      writeln('Le maximum est ', a)
   else
      writeln('Le maximum est ', b)
 End.

Langage Pascal

Bonjour le monde

Sommaire