刚刚开始学习编程,学的是fortran,在做"fortran95程序设计(彭国伦)"上的第5章第2题时,自己编的一个程序运行时总提示程序有10个错误,我自己怎么也检查不出来,程序代码如下:望各位大虾帮忙啊
program main
 implicit none
 integer day
 write(*,*) "请输入星期几:"
 read(*,*) day
 if (day=1.or.day=4) then
  write(*,*) "节目为新闻"
 else if (day=2.or.day=5) then
  write(*,*) "节目为电视剧"
 else if (day=6) then
  write(*,*) "节目为卡通片"
 else if (day=7) then
  write(*,*) "节目为电影"
 else
  write(*,*) "错误的输入"
 end if
 stop
end program
对了,还有就是这本书光盘里提供的解答程序好多都有错误,有些我找得出来,有些就不能了,是不是这书故意这样的啊~