Написание программ в системе Mathematica
Программы в системе Mathematica предоставляют беспрецедентно ясные способы записи алгоритма.
Обе эти программы аппроксимируют Золотое Сечение с точностью до k знаков.
{1.6180339887498948482,1.6180339887498948482, 1.6180339887498948482}
В программах системы Mathematica возможно уникальное соединение математической и вычислительной систем обозначений.
Эта программа соответствует недавно открытой приближенной формуле для нахождения количества простых чисел, меньших заданного числа.
Сравнение приближенного результата с точным значением, полученным с помощью встроенной функции PrimePi.
{168, 168}
Программа в системе Mathematica может одновременно состоять из блоков, выполняющих численные, символические и графические операции. Ниже в качестве примера приведена короткая программа для работы с одной сложной квантовой моделью.
Это программа, отвечающая модели Kohmoto для спектра энергии квантовой частицы в одномерном квазипериодическом потенциале.
FareySequence[q_]:=Apply[Union,Array[Range[#-1]/#&,q]]
Пример работы программы.
Show[Graphics[SpectrumData /@ FareySequence[20]]]
-Graphics-