pascalabcnet/TestSuite/check_sequence.pas

11 lines
166 B
ObjectPascal
Raw Permalink Normal View History

2023-09-18 11:00:06 +03:00
procedure CheckOutputSeq(a: sequence of integer);
begin
end;
procedure CheckOutputSeq(a: sequence of object);
begin
end;
begin
CheckOutputSeq(Arr(1,2,3));
end.