fun readLargeInt () =
    valOf (TextIO.scanStream (LargeInt.scan StringCvt.DEC) TextIO.stdIn)

fun findAns s =
    let
        val cs = String.explode s
        val len = List.length cs
        val ansString = (List.take (cs, len - 2)) @ [#"."] @ (List.drop (cs, len - 2))
        val ans = String.implode ansString
    in
        ans
    end


val () =
    let
        val d = readLargeInt ()

        val tempAns = LargeInt.toString (d * 108)
        val ans = findAns tempAns
    in
        print (ans ^ "\n")
    end