uses System, System.Collections.Generic; procedure p (b: Func, X>; c: Y); begin writeln(b.GetType()); end; begin p(x -> x, 5); end.