//!GetType не объявлен в типе function(i: integer): string
function f(i: integer): string;
begin
end;
writeln(f.GetType);
end.
