program sample
	character(len=1) :: a
    
    read(*,*) a
    
    if (a=='S') then
    	write(*,*) 'Cloudy'
    else if (a=='C') then
    	write(*,*) 'Rainy'
    else
    	write(*,*) 'Sunny'
    end if
    stop
end program sample