PROCEDURES ET VARIABLES LOCALES
Une procédure peut déclarer ces propres variables qui serviront de variables de travail. Ces variables appartiennent à la procédure dans laquelle elles sont déclarées. Les variables déclarées à l'intérieur d'une procédure sont appelées des variables locales.

Les variables locales sont accessibles partout entre les mots-clés begin et end de début et fin de la procédure. Le programme qui suit illustre l'usage et les possibilités (où les variables sont-elles visibles ou connues) des variables locales.

	program LOCAL_VARIABLES (input, output);
	var   number1, number2 : integer;  {elles sont toujours accessibles}

	procedure add_numbers;
	var   result : integer;            {result appartient à add_numbers}
	begin
	      result := number1 + number2;
	      writeln('La réponse est ',result)
	end;

	begin                              {le programme commence ici}
	      writeln('Entrez deux nombres à additionner');
	      readln( number1, number2 );
	      add_numbers
	end.

	program  MUSIC (output);
	const SCALE = 'La note est ';
	var   JohnnyOneNote : char;

	procedure Tune;
	const SCALE = 'La note est maintenant';
	var   JohnnyOneNote : char;
	begin
	      JohnnyOneNote := 'A';
	      writeln(SCALE, JohnnyOneNote )
	end;

	begin
	      JohnnyOneNote := 'D';
	      writeln(SCALE, JohnnyOneNote );
	      Tune;
	      writeln(SCALE, JohnnyOneNote )
	end.