8 lines
182 B
ObjectPascal
8 lines
182 B
ObjectPascal
procedure CheckOutputSeq(a: sequence of char); begin end;
|
|
|
|
procedure CheckOutputSeq(a: sequence of object); begin end;
|
|
|
|
begin
|
|
var a := ArrFill(10,'*');
|
|
CheckOutputSeq(a);
|
|
end. |