solve[{ c1-c2+c3==0, -c1+c2-c3==0, a1-c1*R1-c2*R2==0, a2-c3*R3-c2*R2==0, a1-c1*R1+c3*R3-a2==0 }]