/
n-dimens
/
pascalabcnet
Обзор
Документация
Войти
/
n-dimens
/
pascalabcnet
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
TestSuite/CompilationSamples/ComplexExample.pas
17 строк
499 B
Artem Pelenitsyn
change encoding for all *.pas and *.cs files: cp1251 -> utf-8
28 дек 2015, 14:25
28 дек 2015, 14:25
49378a6
Код
Авторство
О чём код?
// Использование комплексных чисел {$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.