PROCEDURES PARAMETREES
Les procédures peuvent aussi accepter des paramètres (données) qui leur sont
transmis lorsqu'elles sont appelées.
Déclaration des paramètres de la procédure
Appel de la procédure et passage des variables (ou valeurs) à celle-ci
Exemple:
program ADD_NUMBERS (input, output);
procedure CALC_ANSWER ( first, second : integer );
var result : integer;
begin
result := first + second;
writeln('Answer is ', result )
end;
var number1, number2 : integer;
begin
writeln('Entrez deux nombres a additionner');
readln( number1, number2 );
CALC_ANSWER( number1, number2)
end.
program TestValue (output); var x, y : integer; procedure NoEffect ( x, y : integer ); begin x := y; y := 0; writeln( x, y ) end; begin x := 1; y := 2; writeln( x, y ); NoEffect( x, y ); writeln( x, y ) end.Cliquez ici pour la réponse