首页 > 中学考试杂题 > 题目详情
Mathematica画图的一个问题sol = Solve[{m^2 + n^2 == 36,(m - 7)^2 + n
题目内容：
Mathematica画图的一个问题
sol = Solve[{m^2 + n^2 == 36,(m - 7)^2 + n^2 == 25},{m,n}][[1]];
{m,n} /.sol;
p3 = ContourPlot[(x - m)^2 + (y - n)^2 == 4,{x,-10,10},{y,-10,10}];
Show[p3]
以上语句是想从方程中解出m、n两个数（用“[[1]]”取第一组解）,然后以(m,n)为圆心画圆.可是画出来的是一片空白.
Mathematica画图的一个问题
sol = Solve[{m^2 + n^2 == 36,(m - 7)^2 + n^2 == 25},{m,n}][[1]];
{m,n} /.sol;
p3 = ContourPlot[(x - m)^2 + (y - n)^2 == 4,{x,-10,10},{y,-10,10}];
Show[p3]
以上语句是想从方程中解出m、n两个数（用“[[1]]”取第一组解）,然后以(m,n)为圆心画圆.可是画出来的是一片空白.
sol = Solve[{m^2 + n^2 == 36,(m - 7)^2 + n^2 == 25},{m,n}][[1]];
{m,n} /.sol;
p3 = ContourPlot[(x - m)^2 + (y - n)^2 == 4,{x,-10,10},{y,-10,10}];
Show[p3]
以上语句是想从方程中解出m、n两个数（用“[[1]]”取第一组解）,然后以(m,n)为圆心画圆.可是画出来的是一片空白.
本题链接：