Bonsoir , j'ai réalisé un petite programme qui m'affiche le résultat d'une division avec son reste , en colonne , par divisions successives , le voici :

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
21
22
23
24
25
program division;
 
function div_ise(a: INTEGER; m: INTEGER): INTEGER;
 
begin
 
while(a <> 0) do
begin
   a := a div 10;
   m := a mod 10;
   writeln(a,' ',m);
end;
end;
 
var
 
   x:INTEGER;
   y:INTEGER;
 
BEGIN
 
readln(x);
writeln(div_ise(x,y));
 
end.
Mes questions sont ici : est ce que les variables a et m j'aurais dû les déclarer en local ou les mettre en paramètres c'est aussi bien ?

Et j'ai appris qu'une fonction devait retourner une valeur mais j'ai l'impression que la mienne renvoit rien , j'aurais pas oublié une ligne car à chaque fois que j'écris une fonction ya une petite erreur de compil ( qui au passage m'empeche pas de compiler ) , mais c'est pas très propre :

divise.pas(3,10) Warning: Function result does not seem to be set