有个关于热传导的程序运行不出来 高手给指点下谢谢

[yf5955326]

程序放在附件里了 您帮忙看看运行到49行就出问题了，您要是有时间的话帮忙多给这个程序注释一下实在是看不懂，我太菜了。呵呵 有时间加我qq250050176 邮箱[email protected]