proc getchar_unlocked():char {. importc:"getchar_unlocked",header: "" .} proc printf(formatstr: cstring){.header: "", varargs.} proc printFloat(a,b:int) = if a mod b == 0: printf("%d\n",a div b) else: let f = a / b printf("%.5f\n",f) var S : array[100002,char] var left = 0 var l = 0 while true: l += 1 let c = getchar_unlocked() S[l] = c if c == 'o' : left += 1 elif c != 'x': break left *= 100 for i in 1..