11 lines
223 B
ObjectPascal
11 lines
223 B
ObjectPascal
procedure Output(params arr: array of object);
|
|
begin
|
|
foreach var obj in arr do
|
|
Println(obj);
|
|
end;
|
|
|
|
begin
|
|
Output(1,2.5,'z','PascalABC.NET');
|
|
var a: array of object := (1,2.5,'z','PascalABC.NET');
|
|
Output(a);
|
|
end.
|