能读入但是无法代入循环

fcode

x=0
t=0
移动到第一层循环内，第二层循环开始前

题外话： do while(.true.) 可以简写为  do

fcode

可以的。他俩完全等效，都是“无条件一直循环”