Red_HerringЦитата:
Раскройте квадрат и все легко вычисляется
Да, действительно легко, ведь подинтегальная функция - многочлен. Только для
Математика считает этот интеграл более 12 минут:
Код:
n = 11; Integrate[ Product[(1 - Sum[x[j]*x[j + 1], {j, 1, k}])^2, {k, 1, n - 1}], {x[
1], -1, 1}, {x[2], -1, 1}, {x[3], -1, 1}, {x[4], -1, 1}, {x[5], -1, 1}, {x[6], -1, 1}, {x[7], -1, 1}, {x[8], -1,
1}, {x[9], -1, 1}, {x[10], -1, 1}, {x[11], -1, 1}] // Timing
{746.016, 98542400349736526511115598662635094016/441507020599556210126953125}