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

InstallerSamples/NETLibraries/NET4.0/ComplexExample.pas

17 строк398 B

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

initial commit

14 май 2015, 22:35

14 май 2015, 22:35e6e67c1

// ������������� ����������� �����
{$reference 'System.Numerics.dll'}
uses System.Numerics;

begin
  var a := new Complex(0,1);
  writeln('������ �������: ', a);
  
  var b := Complex.Sqrt(a);
  writeln('������� ������ �� ������ �������: ', b);
  
  var c := a*a;
  writeln('������� ������ �������: ', c);
  
  var d := new Complex(1,2);
  writelnFormat('������ {0} ����� {1}', d,d.Magnitude);
end.