Si consideri la seguente funzione:
Function foo(x: Integer): Integer; Var y: Integer; Begin y:=0; While(x <> 0) Do Begin y:=y*10; y:=y+x Mod 10; x:=x Div 10; End; foo:=y; End;
Dire cosa restituisce la chiamata foo(4312).
Sezione di VALCON.IT
Si consideri la seguente funzione:
Function foo(x: Integer): Integer; Var y: Integer; Begin y:=0; While(x <> 0) Do Begin y:=y*10; y:=y+x Mod 10; x:=x Div 10; End; foo:=y; End;
Dire cosa restituisce la chiamata foo(4312).