program test5(output);
var a,b:integer;
procedure five(var a,b:integer);extern;

begin
writeln('calling proc five');
five(a,b);
end.