实数错误

Question

program mult1
implicit none
real::x,s,c,t
write(*,*)'Enter value for angle'
Read(*,*) x
s=sin(x)
write(*,*)'s=',s
stop
end program mult1

我的程序无法正常工作

Fortran runtime error: Bad real number at (1)