1.编写fortran。下表给出了成都市汛期(5-9月)逐月平均气温情况,请编写程序输入汛期各月平均气温,计算并输出汛期平均气温。 要求输入的各月气温为整型,输出的汛期平均气温为实型 汛期各月平均气温(°C)5月25,6月28,7月29,8月30,9月26
时间: 2024-09-28 18:05:15 浏览: 25
四阶龙格库塔法程序——_FORTRAN语言编写.rar_K._Runge-Kutta_fortran龙哥库塔_龙格库塔_龙格库塔
5星 · 资源好评率100%
在Fortran语言中,你可以使用下面的代码来实现这个需求。这是一个简单的示例程序:
```fortran
program AverageTemperature
implicit none
integer :: temperature(5), sum_temperature, month
real :: average_temperature
! 输入月份和对应的平均气温
do i = 1, 5
write(*, "('请输入第', I2, '个月的平均气温(C): ', a)", advance = .true.) i
read(*, *) temperature(i)
end do
! 计算总温度和月份数
sum_temperature = 0
do i = 1, 5
sum_temperature = sum_temperature + temperature(i)
end do
! 计算并输出平均气温
average_temperature = real(sum_temperature) / real(5)
write(*, "('汛期平均气温为: ', f4.2, ' °C')") average_temperature
end program AverageTemperature
```
在这个程序里,我们首先定义了一个存储每月气温的整型数组`temperature`,以及用于累加和计算平均值的变量`sum_temperature`。通过循环获取用户输入的五个月份的气温,并将其累加。最后,我们将累计温度除以5得到平均值,然后将结果转换为实型并输出。
阅读全文