Call by arrays
Pascal         C/C++
type
   realarray = array[0..9] of
real;
procedure p(var a:
realarray);
begin
    a[1] := a[2] + a[3]
end;
   ANSI C:
void p(float a[])
{   a[1] = a[2] + a[3];
}
   OR
void p(float *a)
{       a[1] = a[2] + a[3];
}