proc scanf(formatstr: cstring){.header: "", varargs.} proc printf(formatstr: cstring){.header: "", varargs.} var S : array[100002,char] scanf("%s\n",addr S) var left = 0 var l = 0 while S[l] != '\0': if S[l] == 'o' : left += 1 l += 1 for i in 0..