Somme de valeurs et problème avec les variables
Salut tout le monde ;
voilà j'ai un problème et je ne sais pas quel est le programme correct parmi ces deux programmes :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
programe heh;
uses crt;
var a,b,c,d:integer;
function somme(x,y:integer):integer;
begin
somme:=x+y;
end;
begin
clrscr
write('donner la valeur'); read(a);
readln(b);
write('la somme est',somme(a,b)); write('la somme est',somme(c,d));
readln;readln;
end. |
et ce programme :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
program heh;
uses crt;
var a,b,c,d:integer
function somme(x,y:integer):integer;
begin
write('donner la valeur'); read(x);
write('donner la valeur'); read(y);
somme:=x+y;
end;
begin
clrscr;
write('la somme est',somme(s,y)); write('la somme est',somme(c,d));
readln;readln; |
Je cherche à savoir quel programme est juste et puis comment on peut appeler la fonction somme une autre fois pour calculer la somme de deux autre entiers c et d car vous voyez que dans les deux programme j'ai fait appel une deuxième fois à la fonction somme mais c'est different... Donc est-ce que vous pouvez m'expliquer tout ça ?
Merci à vous et bonne journée.
