Exponenta.ru

Ваша задача сводится к обычной минимизации функции трех переменных g(t1,t2,t3). Функция g возвращает максимум функции четырех переменных f(t4,t5,t6,t7 | t1,t2,t3) при фиксированных переменных t1,t2,t3.

Компактное решение в Maple:

s:="30-40";
Statistics:-Mean(parse~(StringTools:-Split(s,"-")));

35

Процедура всегда возвращает последнее значение, которое вычислено в процедуре. В процедуре, которая подается на вход Search() последним стоит оператор print(), что не допустимо, так как процедура, представляющая целевую функцию, должна возвращать число. Поставьте оператор print() на первое место в п...

Чтобы вывести промежуточные результаты расчета можно в процедуру, представляющую целевую функцию, вставить команду print(x1,x2,...,f);, где x1,x2,...аргументы функции, а f - значение функции. При каждом обращении к целевой функции будут печататься все результаты обращения к целевой функции. Можно пе...

tt:=time():

Любые вычисления

time()-tt;

Уважаемый Kitonum ! Советую разместить рабочий лист с процедурой и примерами на Maple Application Center. Это резко увеличит количество потенциальных пользователей.

Странно, у меня в Maple 13 команда simplify(solve(abs(1-а*x) = 1+(1-2*a)*x+a*x^2, x)) assuming a::real,x::real; выдает совсем другое решение (слишком длинное чтобы приводить его тут). Это решение похоже на решение, указанное Markiyan Hirnyk, но слегка отличается в условиях на параметр а. Вполне допу...

Честно говоря, я не совсем понял следующее утверждение Kitonum о пакете Mathematica: "только он, например, решает уравнения, системы и неравенства с параметрами". Что имеется в виду? Команда solve пакета Maple, также "решает уравнения, системы и неравенства с параметрами". Наприм...

d11:=Matrix(4,4):
d22:=Matrix(4,4):
d33:=d11+d22:

d33^(-1);

or

LinearAlgebra:-MatrixInverse(d33);

Сообщение Error, Array elements cannot be unassigned
означает буквально то, что оно сообщает. Т.е. элемент массива нельзя сделать неназначенным. Пример,

J:=Array(0..10^4);
J[1]:='J[1]':

Error, Array elements cannot be unassigned

Ошибка была из-за отсутствия инициализации счетчика i в цикле. Например, следующие команды вызовут ту же ошибку, если начальное значение для переменной i не назначено:

for j to 10 do;
i:=i+1;
end do;

Error, too many levels of recursion

Что касается начальной точки поиска в пакете DirectSearch. По умолчанию эта точка равна 0.9, ... 0.9. Для Ваших ограничений эта точка является недопустимой, поэтому пакет ищет новую допустимую точку. Вы сами можете легко задать допустимую точку. Для этого замените команду DS:=SolveEquations([x=rhs(H...

Очень много ошибок в программе. 1. Не описана индексная переменная J. Вставьте команду J:=Array(0..10^4); в начале программы. 2. Не инициализирован счетчик i в цикле. Вставьте команду i:=0; в начале программы. 3. Загружен пакет DirectSearch командой with(DirectSearch): и потом в цикле введена переме...

Если матрица является конечным (а не промежуточным) результатом выполнения процедуры то просто присвойте имя процедуре - это имя и будет именем матрицы.

Ваш интеграл int(exp(-I*lambda*xi)*exp(-abs(xi)^3),xi =-infinity..infinity) в принципе не может быть рассчитан численно никакими методами численного интегрирования, так как не задано значение для lambda. Стоит его задать и все проблемы исчезают: lambda:=1; evalf(Int(exp(-I*lambda*xi)*exp(-abs(xi)^3)...