Call by value
Pascal         C/C++
function f(x, y: integer;
         z: real) : real;
var
   q: integer;
begin
   q := sqr(x) + y;
   f := q – z;
end;
   ANSI C/C++:
float f(int x, int y ,float z)
{   int q;
    q = x*x +y;
     return (q – z);
}