我正在使用Mathematica来解决一些与几何有关的简单方程,然后用不同的语言†对这些解决方案进行硬编码。与其有许多页的代码,不如将解决方案编码为多项式的根,这将更加简洁。== (w - 2 r - NC xstep)^2 + (h/2 - r - dist/2)^2这会产生一个“非常大的输出”,其中包含大量的分数、平方根和四根显然,这两个已求解的变量是四次方程的根。
PostScriptForm的“不同语言”是PostScript,而我
我正在写一个Fortran,它必须求解平方根,这会导致得到一个复数,但Fortran不会打印它,也不会将它传递给另一个变量。它给出了(NaN,0.000)。program test COMPLEX X a = 1 X = sqrt(b - 4*a*c)
print *, REAL(X), ' - j',-AIMAG