21 lines
375 B
ObjectPascal
21 lines
375 B
ObjectPascal
uses System;
|
|
|
|
procedure test(params a:array of object);
|
|
begin
|
|
end;
|
|
|
|
var s:string;
|
|
|
|
begin
|
|
//Console.WriteLine('{0} {1} {2} {3} {4}',1,2,3,4,5);
|
|
{Writeln('d',10:3,11:10,110,' ',100000001,' ',100.126:5:2);
|
|
Writeln(1.gettype:10);
|
|
Write(1.gettype,' '.gettype);
|
|
Writeln(#13#10,Concat('1 ','2 ','3 ','4 '));
|
|
readln;{}
|
|
test(1,2,3);
|
|
s:=Concat('1 ','2 ','3 ');
|
|
end.
|
|
|
|
|