pascal:procedure

Un article de Polydoc.

Sommaire

[modifier] Synopsis 

{ Déclarer une procédure }
 
procedure MaProcedure(MesVariables : types );
 
begin
 
	{ commandes }
 
end;
 
{ Appeler la procédure }
 
MaProcedure(MesVariables);

[modifier] Description

La procédure MaProcedure est déclarée.

Les variables MesVariables attendues en paramètre sont utilisées par les commandes comme variables locales dans le bloc de la procédure délimité par begin et end.

Pour exécuter la procédure il suffit de l'appeler en passant en paramètre les variables du (des) type(s) attendu(s).


[modifier] Exemples

Procédure qui calcule la moyenne de 3 notes. 

{ déclaration des types et des variables }
 
...
 
type tableau = array[1..3] of integer;
var
	s,m : real;
	MonTableau : tableau;
 
{ déclaration de la procédure }
 
procedure SommeMoyenne (tab: tableau; var moy,som : real);
 
var i :integer;
 
begin
	som := 0;
	for i := 1 to 3 do
		som := som + tab[i];
	moy := som / i;
end;
 
{ appele la procedure dans le bloc principal du programme }
 
...
 
SommeMoyenne(MonTableau,m,s) { MonTableau doit être affecté de 3 valeurs entières, cette étape n'a pas été effectuée dans l'exemple }
 
writeln('somme = ', s);
writeln('moyenne = ', m);
 
...

[modifier] Voir aussi

[modifier] Liens internes

Récupérée de « http://www.polydoc.org/wiki/pascal:procedure »