4 lines
53 B
ObjectPascal
4 lines
53 B
ObjectPascal
begin
|
|
var v := 0;
|
|
var p := procedure->(v:=v);
|
|
end. |
begin
|
|
var v := 0;
|
|
var p := procedure->(v:=v);
|
|
end. |