面试题：Fortran数学函数库中常用三角函数的应用

Question

在Fortran中，使用数学函数库编写一个程序，计算并输出0到360度（以10度为步长）的正弦值和余弦值。要求使用DO循环遍历角度，并正确调用数学函数库中的正弦和余弦函数。

Answer 1

program sin_cos_values
    implicit none
    real :: angle, sin_value, cos_value
    integer :: i

    do i = 0, 360, 10
        angle = real(i)
        sin_value = sin(angle * 3.141592653589793 / 180.0)
        cos_value = cos(angle * 3.141592653589793 / 180.0)
        write(*,*) 'Angle:', angle,'degrees, Sin:', sin_value, ', Cos:', cos_value
    end do
end program sin_cos_values