【求助】带有积分项的方程求解

romanticer

未知数H的方程，其中有两项带有对时间t的积分，t=0时，H=10^-6.17, S=0;
1.99*10^11*H=0.076/H+5.83*10^-9/（H^2）+S/(1+H*10^-3+0.0102/H)+2*S/(H^2/10.2+H/0.0102+1);
其中S是R从0到t的积分，R=4.2*10^-6+0.834*10^-6/H+2.034*10^-10/(H^2)+93.9/(1+13*H);
t从0到3600，求H和S的数值解
求代码
先谢过大牛们！