val a=readLine split',' for(c<-"QJ";s<-a)println(c+s) for(s<-a(3)+:a.init;c<-"A0K987")println("1"*(48/c)+c+s)
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page