program print;
var a,b:integer;
procedure printint (a:integer);extern;

begin
printint(a);
end.