{ein "kompliziertes "Pascal Programm :)"}

Procedure Summe(a,b:integer; var c:integer);
  begin
    c:=a+b;
  end;

Var x,v:integer;

Begin
  x:=5;
  Summe(x+2, 10, v);
End.

{
Wie der Stapel bei der Proceduraufruf Summe(x+2,10,v)
ausschaut:

   ------------------   <-BP
  |      BP          |
  | Rueckkehradresse | bp+2
  |   Offset c (v)   | bp+4
  |     Seg c (v)    | bp+6
  |       b=10       | bp+8
  |       a=7        | bp+10
   ------------------

}