-1

最近、fortranプログラミングを習い始めました。コンパイルされたエラーなしで、YouTube で次のコードを見ました。しかし、いくつかのエラーがあります。どんな助けにも感謝します

program 
  implicit none
  real, parameter :: pi=4*atan(1.0) 
  integer, parameter :: n = 100
  real :: dimension(1:n) :: x, y
  real :: a=0.0, b = 2*pi
  real :: increment
  integer :: i  

  increment = (b-a)/(real(n)-1) 

  x(1)=0.0
  do i =2,n
    x(i) = x(i-1) + increment
  end do

  y = sin(x)

  print *, x(1:5)
  print *, y(1:5)

end program
4

3 に答える 3

1

また、混合モードの算術演算が並んでいます

increment = (b-a)/(real(n)-1)

おそらくコンパイルされ、プログラムに影響を与えることさえありませんが、奇妙で見つけにくいバグを引き起こす可能性があるため、どのプログラミング言語でも混合モードの算術演算を使用しないでください。
次のようになります。

increment = (b-a)/(real(n)-1.0)

于 2013-08-02T14:45:00.063 に答える