pascalabcnet/TestSuite/overloads10.pas

6 lines
95 B
ObjectPascal
Raw Permalink Normal View History

2019-04-21 13:01:24 +03:00
function f1: sequence of integer:= Seq(1,2);
begin
var s := f1+f1;
assert(1 in s);
end.