fortran题目1.下表给出了成都市汛期(5-9月)逐月平均气温，情况，请编写程序输入汛期各月平均气温，计算并输出汛期平均气温。 要求输入的各月气温为整型，输出的汛期平均气温为实型 汛期各月平均气温：5月25度，6月28度，7月29度，8月30度，9月26度

在Fortran语言中，你可以通过以下步骤编写一个简单的程序来解决这个问题：

program AverageTemperature
    implicit none

    integer :: month, i
    real :: temperature(5), total_temperature, average_temp

    ! 输入各月温度数据
    do i = 1, 5
        write(*,*) "请输入第", i, "个月的平均气温:"
        read(*,*) temperature(i)
    end do

    ! 计算总温度
    total_temperature = sum(temperature)

    ! 计算并输出汛期平均气温
    average_temp = total_temperature / real(5)   ! 注意这里将整数5转换为浮点数
    write(*,*) "汛期平均气温为: ", average_temp

end program AverageTemperature