fortran语句：pi=dacos(-1.D0)

dacos()是fortran中返回值是双精度（有十五位有效数字）的反余弦函数，其参数也是双精度的数，-1.D0就是双精度数。-1.D0代表的是-1.00000000000000，这是fortran的一种表示格式，它可以输出十五位有效数字，D前面的-1.表示-1.0，D后面的0代表-1.0扩大的倍数，譬如1.3D.3就表示1.3*10^3（不过表示时得换成十五位有效数字1300.00000000000替代之。）下面这个程序可供参考，希望能帮到你：

program main

implicit none

write(*,*)1.235d3

write(*,*)0.5d0

write(*,*)dacos(0.5d0)

write(*,*)314.159265d-2

write(*,*)dcos(314.159265d-2)

stop

end

您好，在Fortran中，要计算π，可以使用内置函数PI，它会返回π的值，可以使用乘法运算符*来乘以π，例如：a=3*PI，则a的值为9.42478。另外，还可以使用内置函数ATAN2来计算π，它会返回π的值，例如：b=ATAN2(1,1)，则b的值为π/4。此外，还可以使用内置函数SIN来计算π，它会返回π的值，例如：c=SIN(PI/2)，则c的值为1.0。总之，在Fortran中，可以使用内置函数PI、ATAN2和SIN来计算π，也可以使用乘法运算符*来乘以π，以便获得π的值。

---