Az alábbi kódrészletek bemutatják az Ada "in out" paraméterátadása és a 
cím szerinti paraméterátadás közötti különbséget.


n: INTEGER := 5;			VAR n: INTEGER;

procedure A (i: in out INTEGER) is	procedure A (VAR i: INTEGER);
begin					begin
	i:=6;					i:=6;
	i:=i+n;					i:=i+n;
end A;					end A;

begin					begin
					  n:=5;
  A(n);					  A(n);
  -- n=11				  (* n=12 *)