13 lines
126 B
ObjectPascal
13 lines
126 B
ObjectPascal
|
procedure p(f: Func<string,string>);
|
||
|
|
begin
|
||
|
|
|
||
|
|
end;
|
||
|
|
|
||
|
|
procedure p(f: Func<integer,integer>);
|
||
|
|
begin
|
||
|
|
|
||
|
|
end;
|
||
|
|
|
||
|
|
begin
|
||
|
|
p(x->x*x);
|
||
|
|
end.
|