Exponenta.ru

restart; infolevel[all] := 3: with(powseries): powcreate(b(n) = (-1)^n*(Psi(n)+gamma-ln(2))/(n*2^(n-1)), b(0) = 1); Parse: Calling PreGeneral Parse: Completed PreGeneral Parse: Special case transformations Parse: Completed special case transformations Parse: Delimiter matching Parse: Completed deli...

Намерен продолжить обсуждение.

Результат with(RealDomain): plot(arcsin((1/8)*x^2-1)-2*arcsin((1/4)*x)+(1/2)*Pi, x = -5 .. 5, thickness = 3); ошибочный (см. часть графика для x > 4). Впрочем, restart; Student[Calculus1]:-FunctionPlot(arcsin((1/8)*x^2-1)-2*arcsin((1/4)*x)+(1/2)*Pi, x = -5 .. 5, thickness = 3); рисует правильный рез...

restart; with(RealDomain): solve(log(x^3+(1/2)*y^3+1/9) = log(x)+log(y), [x, y]); [[x = x, y = ((-27*x^3-3+3*sqrt(81*x^6-6*x^3+1))^(2/3)+6*x)/(3*(-27*x^3-3+3*sqrt(81*x^6-6*x^3+1))^(1/3))]] вместо [[х = 3^(2/3), y = 3^(1/3)]] , как правильно решает ММА. Эта ошибка распространенная.

Это я вам не отвечу.

Мэйпл имеет команду with(VectorCalculus): Jacobian([cos(x-1)+3*y-1.5, -cos(y)+2*x-4], [x, y]); Matrix(2, 2, [[-sin(x-1), 3], [2, sin(y)]]) Указанную команду можно разыскать поиском ?Jacobian в рабочем поле . Перевод термина на английский язык можно сделать в Яндексе или Гугле.

Рассмотрим with(Statistics): X := RandomVariable(NonCentralChiSquare(k, mu)): Z := sqrt(X)*exp(-t*X): M := Mean(Z); -(1/2)*2^(1/2)*t^(-1/2-(1/2)*k)*((2*t+1)/t)^(-1/2-(1/2)*k)*exp(-(1/2)*mu)*Pi^(1/2)*(4*LaguerreL(1/2-(1/2)*k, (1/2)*k, (1/2)*mu/(2*t+1))*k^2*t^2+4*LaguerreL(1/2-(1/2)*k, (1/2)*k, (1/2)*...

Ваш код производит ошибку

NDSolve::dsvar: 0 cannot be used as a variable.

Судя по результату restart; dsolve({diff(x(t), t) = x(t)*cos(t)^2+y(t)*((1/2)*sin(2*t)-1), diff(y(t), t) = x(t)*((1/2)*sin(2*t)+1)+y(t)*sin(t)^2}, {x(t), y(t)}); {diff(diff(x(t), t), t) = (-cos(t)^4*x(t)+cos(t)^3*sin(t)*(diff(x(t), t))-cos(t)^2*sin(t)^2*x(t)+cos(t)*sin(t)^3*(diff(x(t), t))+sin(t)*co...

Результат команды plots:-implicitplot([log[x+5](y^2-20*y+100)+log[y-10](x^2+10*x+25) = 4, log[x+5](-2*y+23)+log[y-10](2*x+9) = 2], x = -9/2 .. -3, y = 10 .. 23/2, color = [red, blue], gridrefine = 3, style = [point, line]); ошибочен: значение x в красном графике не может равняться -4, т. к. 1 не яля...

Еще один дефект.

Все, конец математики: 2 + 2 = 5 и 2 + 2 = 4.

Еще один промах:

Первое решение ложно. Отмечу, что ММА вообще не решает эту систему.

Еще один ляпсус

Просьба сообщить в Мэйплсофт о следующем изъяне with(RealDomain): sol :=solve(x^2-a = abs(x-b), [x]) ; eval(sol, [a = -2, b = 3]); [] solve(eval(x^2-a = abs(x-b), [a = -2, b = 3]), [x]); [[x = -1/2-(1/2)*sqrt(5)], [x = -1/2+(1/2)*sqrt(5)]] Я не имею возможности сделать это лично.

Для начала прочитайте справку.