FORTRAN 77“错误:(1)处无法分类的陈述”

问题描述 投票:2回答:1

此程序:

C This program calculates cos(x**2)

      PROGRAM COSX_SQUARE
      IMPLICIT NONE
      INTEGER a
      REAL y, r

      PRINT*, 'INPUT THE DEGREE'
      PRINT*, 'BETWEEN 0 AND 360'
      READ*, a

      a*(3.141592/180) = y

C This part determines minus sign and calculates the function

      IF (a .GT. 90) THEN
         r = -(1-(y**4)/2+(y**8)/24-(y**12)/720+(y**16)/40320)
      ELSEIF (a .GE. 270) THEN
         r = 1-(y**4)/2+(y**8)/24-(y**12)/720+(y**16)/40320
      ELSEIF (a .GT. 360) THEN
         PRINT*, 'INVALID DEGREE'
         PRINT*, 'DEGREE MUST BE BETWEEN 0 AND 360'
      ELSEIF (a .LT. 0) THEN
         PRINT*, 'INVALID DEGREE'
         PRINT*, 'DEGREE MUST BE BETWEEN 0 AND 360'
      END IF

      PRINT*, 'THE RESULT OF COS', a, 'SQUARE IS = ', r

      STOP
      END

给出此错误:

    a*(3.141592/180)=y                                
    1
Error: Unclassifiable statement at (1)

我已经将a定义为INTEGER。为什么此错误不断出现?

fortran fortran77
1个回答
3
投票
是的。这是一个开始声明的表达式。也许将其更改为

y = a*(3.141592/180)

© www.soinside.com 2019 - 2024. All rights reserved.