5 lines
78 B
ObjectPascal
5 lines
78 B
ObjectPascal
|
function f1 := 1;
|
|||
|
|
|
|||
|
|
begin
|
|||
|
|
Assert(Arr(f1,f1).SequenceEqual(Seq(1,1)));
|
|||
|
|
end.
|