&anchor = 1 maxlen = 100000 word = input for (;;) { if (word '.') break words = words rpad(word,maxlen) word = input } while (num = input) { if (num '.') { output = line line = } else { words len((num - 1) * maxlen) len(maxlen) . word line = line trim(word) ' ' } } output = line