read `KW.txt`: L[7]:=[seq(BetterCount(7,i),i=1..1000)];