proc getchar_unlocked():char {. importc:"getchar_unlocked",header: "<stdio.h>" .}
proc printf(formatstr: cstring){.header: "<stdio.h>", varargs.}
var S : array[100002,char]
var left: int32 = 0
var l : int32 = 0
while true:
  l += 1
  let c = getchar_unlocked()
  S[l] = c
  if c == 'o' : left += 1
  elif c != 'x': break
left *= 100.int32
for i in 1.int32..<l.int32:
  let res :float32= left / (l-i)
  printf("%.5f\n",res)
  if S[i] == 'o' : left -= 100