proc putchar_unlocked(c:char){.header: "" .} proc scanf(formatstr: cstring){.header: "", varargs.} proc printAsciis(a:int) = const bound = 'z'.ord - 'a'.ord if a == 0: putchar_unlocked('a') return var n = a while n > 0: var c = chr('a'.ord + (n mod bound)) if c == 'n' : c = 'z' putchar_unlocked(c) n = n div bound var n : int scanf("%d",addr n) # a [b,c,...,z] var dst = 0 var ascii = 0 for i in 0..