5 lines
87 B
ObjectPascal
5 lines
87 B
ObjectPascal
|
|
begin
|
||
|
|
var p: procedure(x: integer);
|
||
|
|
p := x -> if True then Print(x);
|
||
|
|
p(666);
|
||
|
|
end.
|