Re:josch83,fat_cartman,jisisv,kalamit+...

Bonsoir;
Vous vous rappeler du programme p2, maintenant Je vais vous proposer

Utiles Et pour bien comprendre les résultat des procédure, quand en modifie
Les paramètres aux nivaux des variables local(procédure) et global
Ces programmes sont du plus simples aux plus intéressant, vous aussi
S.V.P ,vous pouvez m’aidez :

Program p5 ;
Var
Y :integer ;
Procedure incrementer (var x:integer ;z :real);
Begin
x:=x+1;
z:=z+1;
writeln(‘z=’,z) ;
end;
begin

y:=2;
incrementer (y,2.0);
writeln (‘y=’,y);
end.

Résultat sur écran :

Y=3
Z=4.0 {je ne s’ais même pas quelle résultat est le 1er ou le 2emme, y ou z,(et si ce programme est juste ?)}

Programme p_3 ;

Var
Y : integer ;
Z :real ;

Procedure incrementer (var x:integer; z:real);

Begin
X:=x+1;
Z:=x+1;

Begin

Y:=2; z:=2;
Incrementer (y,z);

Writeln (‘y=’,y) ;
Writeln(‘z=’,z) ;
End.

Resultat sur ecran :

Y=3
Z=2.0 { vous remarquer ici que la valeur de z je ne l’es pas changer,c’est 2.0 et pas 4.0 !?}

Program p4 ;

Var
Y :integer ;

Procedure incrementer (var :integer ; var z :real) ;
begin
X :=x+1 ;
Z :=z+1 ;
Writeln (‘z=’,z) ; {s.v.p ,c’est just ici?,en peut faire ça?!,ça veut pas dire ici que c’est faux ??!)

Begin
Y :=2 ;
Incrementer (y,2.0) ;
Writeln(‘y=’,y) ;
End.
Résultat sur écran :
Y=3
Z=4.0 {s.v.p,je ne s’ais pas qui s’affiche le 1er ?,es ce que le même résultat que pgme p3 ?!}

Program p_4 ;

Var
Y :integer ;

Procedure incrementer (var :integer ; var z :real) ;
begin
X :=x+1 ;
Z :=z+1 ;

Begin
Y :=2 ;
Incrementer (y,2.0) ;
Writeln(‘y=’,y) ;
Writeln(‘z=’,z) ; {d’habitude en appel a la procédure par une autre variable que z ici (ça veut pas dire…),s.v.p c’est juste le complilateur va pas nous signaler une erreur }
End.
Notre Résultat sur écran :
Y=3
Z=4.0

Programme p_6A ;
Var
Y :integer ;
U :real ;

Procedure incrementer (var :integer ; var z :real) ;
begin
X :=x+1 ;
Z :=z+1 ;

Begin
Y :=2 ;
Incrementer (y,u) ;
Writeln(‘y=’,y) ;
Writeln(‘u=’,u) ;
End.
Résultat sur écran :
Y=3
u=4.0
nota bene (question) : s.v.p quand en appel ici a une procédure incrementer,et quand on a (y,2.0), un nombre(réel),la seule solution pour afficher le 2emme paramètre est demander
au compilateur d’afficher le résultat au niveaux de la procédure (retourner la valeur si ont peut dire ;variable local) ,S.v.p. s’il vous plait commenter en donnant des exemples ,après de passer de façon optimum S.v.p dans tout les programme importants,Merci

Programme p_6b ;
Var
Y :integer ;
U :real ;

Procedure incrementer (var :integer ; var z :real) ;
begin
X :=x+1 ;
Z :=z+1 ;
Writeln(‘z=’,z) ;

Begin
Y :=2 ;
Incrementer (y,u) ;
Writeln(‘y=’,y) ;
Writeln(‘u=’,u) ;
End.
Résultat sur écran : {s.v.p, c’est juste ?je ne s’ait pas l’ordre ?,merci }
Y=3
Z=4.0
u=4.0

Merci