उदाहरण 2 चरण, एक सत्र में क्रम से चलाए गए। हर चरण इंजन पर निष्पादित हुआ और नीचे का आउटपुट वही है जो उसने उत्पन्न किया।
pts = NSolve[x ^ 2 + y ^ 2 == 1 && y - 2x ^ 2 + 3 / 2 == 0, {x, y}]{{x -> 0.9510565162951536, y -> 0.3090169943749477}, {x -> 0.5877852522924731, y -> -0.8090169943749475}, {x -> -0.5877852522924731, y -> -0.8090169943749475}, {x -> -0.9510565162951536, y -> 0.3090169943749477}}Show[{ContourPlot[{x ^ 2 + y ^ 2 == 1, y - 2x ^ 2 + 3 / 2 == 0}, {x, -1.5, 1.5}, {y, -1.5, 1.5}], Graphics[{Red, PointSize[Medium], Point[{x, y} /. pts]}]}]-Graphics-सभी रेसिपी · फ़ंक्शन संदर्भ · इसे किसी MCP क्लाइंट से उपयोग करें