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

TestSamples/CompilationSamples/AutoVars.pas

10 строк175 B

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

initial commit

14 май 2015, 22:35

14 май 2015, 22:35e6e67c1

// ��������������� ���� ����������
// �������� ���������� � ��������� ����� for
begin
  var x := 2;
  for var i:=1 to 10 do
  begin
    write(x,' ');
    x += 2;
  end;  
end.