Підручник 4 кроків, що виконуються по порядку в одній сесії. Кожен крок було виконано на рушії, і вивід нижче — те, що він дав.
NIntegrate[(1/Sqrt[x])Log[(1/x)], {x, 0, 1}, Method -> {"GlobalAdaptive", Method -> "ClenshawCurtisRule"}]4.NIntegrate[Log[1 + x ^ 2 + y], {x, 0, 10}, {y, 0, 10}, Method -> {"CartesianRule", Method -> {"GaussKronrodRule", "ClenshawCurtisRule"}}]NIntegrate[Log[1 + x^2 + y], {x, 0, 10}, {y, 0, 10}, Method -> {CartesianRule, Method -> {GaussKronrodRule, ClenshawCurtisRule}}]NIntegrate[Boole[x^2 + y^2 < 1] * (1 - Sqrt[x^2 + y^2]), {x, -1, 1}, {y, -1, 1}, Method -> {"EvenOddSubdivision", Method -> "LocalAdaptive"}]NIntegrate[Boole[x^2 + y^2 < 1]*(1 - Sqrt[x^2 + y^2]), {x, -1, 1}, {y, -1, 1}, Method -> {EvenOddSubdivision, Method -> LocalAdaptive}]Graphics[{PointSize[0.005], Point[Reap[NIntegrate[Boole[x^2 + y^2 < 1] * (1 - Sqrt[x^2 + y^2]), {x, -1, 1}, {y, -1, 1}, Method -> {"EvenOddSubdivision", Method -> "LocalAdaptive"}, EvaluationMonitor :> Sow[{x, y}]]][[2, 1]]]}, Axes -> True, PlotRange -> {{-1, 1}, {-1, 1}}]-Graphics-