n-dimens/pascalabcnet: The new generation Pascal programming language for .NET

TestSamples/CompilationSamples/params_Writeln.pas

19 строк298 B

Бондарев Иван

initial commit

14 май 2015, 22:35

14 май 2015, 22:35e6e67c1

//��������� � ���������� ������ ����������

procedure writeln(params args:array of object);
var i:integer;
begin
  write('>');
  for i:=0 to args.length-1 do
    System.Console.Write(args[i]);
  System.Console.WriteLine;
end;

var a:integer;

begin
  a:=10;
  Writeln('a=',a,';');
  
  readln;
end.