在 Fortran 上读取用户输入后没有任何显示

问题描述

出于某种原因,在用户输入我的表的上限和下限的限制后,我没有任何显示。我想要做的是,如果用户的上限或下限超过 -10,200 的界限,则用户必须重新输入限制。如果它没有超过限制,那么它会显示一个表格/矩阵,显示从上限到下限的数字以及两列,一列将其转换为华氏度,另一列将其转换为开尔文。

我的 do 循环本身正常运行,但在添加 if 语句后,用户输入上限和下限后什么也没有出现..我做错了什么?

program Lab03b
implicit none
integer::i,k,l
real,dimension(22)::matrix
Write (*,*) 'Please enter the upper and lower limit of your table in centigrade where the 
lower&
& and the upper limit is within -10 to 200. (separate with comma)'
Read (*,*) k,l
if (k>=abs(-10)) then
if (l<=abs(200)) then
    write (*,*) '  Centigrade','       farenheit','        Kelvin'
    do i=k,l
            matrix(i)=i
            print*,i,32.0+1.8*i,i+273.15
    end do
    print*,'your table has',k+1,'rows and 3 columns'
else 
print*,'Your lower limit is less than -10 or your upper limit is greater than 200,please try again' 
end if
end if
  end program Lab03b

解决方法

暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!

如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@)