非常感谢大佬！！
代码如下：
Solve[{ 1 - (\[Lambda] (Subscript[r, 1] - Subscript[r,
2] + \[Delta]))/(k (\[Lambda] - 1)) == Subscript[q,
1], \[Lambda]/
k ( (Subscript[r, 1] - Subscript[r, 2] + \[Delta])/ (\[Lambda] -
1) - Subscript[r, 2]) == Subscript[q, 2]}, {Subscript[r, 1],
Subscript[r, 2]}]

才发现没有图。。不好意思！