language: Fortran (gfortran-4.3.4)
date: 144 days 12 hours ago
link:
visibility: public
1
2
3
4
5
6
7
8
9
10
11
12
13
14
program cheers
implicit none
character(len=1) :: reply
character(len=20) :: name
write(*,*)'please input your name'
read(*,*)name
write(*,*)'happy new year',name
write(*,*)'do you want to play a game?(y/n)'
read(*,*)reply
if (reply=='n') write(*,*)'no you must play'
end if
 
 
end program cheers
prog.f95:11.3:

end if
   1
Error: Expecting END PROGRAM statement at (1)