Discussion :

[abdelmounaime]

Bonjour tout le monde ,
je suis debutant en Pascal et je veux savoir le résultat de ce code et merci :

Question : Exécuter le programme en Pascal suivant et donner les valeurs finales de C et D :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
program calculproduit;
 
var a, b, c, d : real;
 
procedure pproduit (x, y : real; var z : real);
begin
 z := x * y;
end;
 
function  fproduit (x, y : real) : real;
begin
 z := x * y;
end;
 
begin
 write ('Donner une valeur à A :  ');   readln (a);
 write ('Donner une valeur à B :  ');   readln (b);
 pproduit (a, b, c);
 d := fproduit (a-1, b+1);
 writeln ('C = ', c, ' D = ', d);

[Paul TOTH]

42

[Alcatîz]

Bonjour,

C'est sûr que compilé tel quel, ton programme ne va donner aucun résultat.
C'est le moment pour toi d'analyser les erreurs renvoyées par le compilateur. Tu peux t'aider de ces explications : http://pascal.developpez.com/faq/?pa...de-compilation.

Une fonction renvoie un résultat. Pour ce faire, il faut affecter une valeur à son identificateur :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

fproduit := z;

(si z est une variable locale)

ou

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

fproduit := x * y;