3-2-1-4 Simpsoni法 应用示例 国合 开始 输入：Debye温度T(5),精度EPS, 温度THETA 计算：XM=THETA/T四(I=1,N 输入：积分上下限A=104,B=XM Yes B=0 No 调用Simpson积分法子程序计算式右方积分值S2 固体的热容CV=9R公M*3*S2 输出：固体的热容Cy 显示程序 显示输出 结束 花3-2-1-4 Simpson法——应用示例 开始 输入： Debye温度T（5），精度EPS，温度THETA 输出：固体的热容Cv 结束 调用Simpson积分法子程序计算式右方积分值S2 计算：XM=THETA/T(I) (I=1,N) 输入：积分上下限A=10-4，B=XM B=0 Yes No 固体的热容Cv=9R/XM**3*S2 显示程序 显示输出