Fortran Coder

标题: 为什么求不了圆的周长和半径 [打印本页]

作者: URMYH    时间: 2022-3-19 22:21
标题: 为什么求不了圆的周长和半径
不理解

屏幕截图 2022-03-19 221913.png (34.77 KB, 下载次数: 178)

屏幕截图 2022-03-19 221913.png

作者: fcode    时间: 2022-3-20 21:39
1. 代码没有问题。
2. 如果你遇到了问题,请描述你的问题,给出必要错误提示或截图。可能是对编译环境的操作问题~~
3. 尽管你的代码是正确的,但仍然有更合适的改善空间。比如,不要害怕让编译器或计算机多运算几步。相对于让代码容易理解,计算机多计算几步,是非常值得的。

以下代码供参考。
[Fortran] 纯文本查看 复制代码
Program main
  Implicit None
  Real(8) , parameter :: PI = acos(-1.0)
  Real(8) :: r,s,c
  write(*,*) "请输入圆的半径"
  read(*,*) r
  s=PI*r*r
  c=2.d0*PI*r
  write(*,*) s
  write(*,*) c
End Program main






欢迎光临 Fortran Coder (http://bbs.fcode.cn/) Powered by Discuz! X3.2