In[]:=
pp=pH2->
1-x
3
,pI2->
1-x
3
,pHI->
1+2x
3
​​Solve[pHI==5pH2/.pp,x]​​ppf=pp/.x->
4
7
​​Kp=
2
pHI
pH2pI2
/.ppf​​Solve[-8.3145TLog[25]==-8370-17.65T,T]
Out[]=
pH2
1-x
3
,pI2
1-x
3
,pHI
1
3
(1+2x)
Out[]=
x
4
7

Out[]=
pH2
1
7
,pI2
1
7
,pHI
5
7

Out[]=
25
Out[]=
{{T918.434}}