高手帮忙看看我的Fortran程序错在哪

来源：百度知道编辑：UC知道时间：2024/06/23 12:27:51

题目的要求是设计一个输入月份数字然后判断出这个月有几天。
program ex205
implicit none
logical x
integer m,d
read*,m
select case(m)
case(4,6,9,11)
d=30
case(1,3,5,7,8,10,12)
d=31
case(2)
read*,x
select case(x)
case(.ture.)
d=29
case(.false.)
d=28
end select
case default
print*,m,"没有这个月份"
stop
end select
print*,m,"月有",d
end
程序运行后出现错误
F95(14) : error 667 - There is no declaration for user-defined operator '.TURE.'
F95(15) : error 443 - A case statement for this value has already appeared on line 14
请问是我写入的问题还是编译器本身的问题？
我用的是Silverfrost FTN95

拼写错误。。。。以后注意点，下面有批注
program ex205
implicit none
logical x
integer m,d
read*,m
select case(m)
case(4,6,9,11)
d=30
case(1,3,5,7,8,10,12)
d=31
case(2)
read*,x
select case(x)
case(.ture.) //////应该改为case(.true.)
d=29
case(.false.)
d=28
end select
case default
print*,m,"没有这个月份"
stop
end select
print*,m,"月有",d
end

关于FORTRAN的一个问题高手进星座高手帮忙，看看我的星座高手帮忙看看我的日志高手帮忙看看我的配置单. 请高手帮忙看看我的这个问题装机高手帮忙看看我的方案高手,帮忙看看我的电脑配置高手帮忙看看我的配置咋样? 高手帮忙看看我的配置怎么样？高手帮忙看看我配的配置～～