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

TestSamples/CompilationSamples/SimpleNewFeatures.pas

27 строк651 B

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

initial commit

14 май 2015, 22:35

14 май 2015, 22:35e6e67c1

// ���������� ����� ����������� ����� PascalABC.NET

// ������������� ���������� ��� �������� 
var i: integer := 1; 

// ��������������� ���� ���������� ��� �������������
var r := 2.5;

begin
  // ������������� �������� ����������
  var s: real := 1.0;
  
  // �������� ���������� � ��������� ����� (����� ����� ���������� - �� ����� ���� �����)
  for j: integer := 1 to 10 do
    s += j; // �������� += ��� �����

  var p := 1;
  
  // �������� ���������� � ��������� ����� � ���������������� ����
  for var j := 1 to 10 do
    p *= j; // �������� *=
    
  var str := '';
  for c: char := 'a' to 'z' do
    str += c; // �������� += ��� �����
  
end.