Question

为什么fortran输出结果是0（程序如下图）？





Answer 1

问题出在，程序没有给数组f赋值。f1，f2，f3，f4默认都是real*4实数变量，并没有赋值给f。

对数组的赋值有两种方式，一种是f(i)=，也就是指定数组的下标。另一种是数组整体运算，比如f=100，它的所有单元都赋值100。

修改了程序，第一段赋值是整体运算赋值，第二段循环内用的是逐个赋值。分别打印输出。

希望能帮到你。

以下是输出结果。

追答

补充一下。

对real*8变量赋值，最好是用双精度形式，这样才能保证达到real*8的精度。

对语句的改动如下图

相应的计算结果如下

Answer 2

你的fortran程序数组用法不对,导致输出结果为0

改正后的Fortran程序如下,注意数组的用法

program main

REAL(8) c(4),f(4)

f(1)=180.0

f(2)=100.0

f(3)=40.0

f(4)=10.0

do i=1,4

 c(i)=(5.0/9.0)*(f(i)-32.0)

end do

do i=1,4

 print *,c(i)

end do

END

源代码

运行结果