program main
    implicit none
    real(8) :: n
    read *, n
    print *, "decimal"
    print *, n
end program main