Solutions de l'exercice 1 du TP n°2
(informatique en S1 DEUG MAIS+MASS)
1.) Ce programme calcule la moyenne de deux nombres réels.
En voici la preuve constructive
Instruction :
résultat :
readln(x) x1=a (valeur fournie par l'utilisateur)
readln(y) y1=b (valeur fournie par l'utilisateur)
x:=x+y x2=x1+y1=a+b
y:=x-y y2=x2-y1=(a+b)-b=a
x:=x-y x3=x2-y2=(a+b)-a=b
Les indices données aux variables x et y permettent de distinguer
le contenu de ces variables d'une instruction à l'autre. Nous n'avons
indiqué ici que les instructions qui affectent les valeurs de x ou y.
2.) On utilise ici les possibilités d'affichage formaté :
PROGRAM TP2exc1 ;
VAR x, y : real ;
BEGIN
write('x= ') ; readln(x) ;
write('y= ') ; readln(y) ;
(* les lignes suivantes ont été rajoutées *)
writeln('x':25,'y':8) ;
write('avant traitement :') ;
writeln(x:8:1,y:8:1) ;
(* fin de l'ajout *)
x:=x+y ; y:=x-y ; x:=x-y ;
(* la ligne suivante a été modifiée *)
write('après traitement :') ; writeln(x:8:1,y:8:1) ;
END.