微信公众号搜"智元新知"关注
微信扫一扫可直接关注哦!

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

如何解决在 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 举报,一经查实,本站将立刻删除。