Write a function that returns a list of strings populated from the slices of n-length characters of the given word (a slice after another while n-length applies onto the word).
collect("intercontinentalisationalism", 6)
➞ ["ationa", "interc", "ntalis", "ontine"]
collect("strengths", 3)
➞ ["eng", "str", "ths"]
collect("pneumonoultramicroscopicsilicovolcanoconiosis", 15)
➞ ["croscopicsilico", "pneumonoultrami", "volcanoconiosis"]
n.