Jam是个喜欢标新立异的科学怪人。他不使用阿拉伯数字计数,而是使用小写英文字母计数,他觉得这样做,会使世界更加丰富多彩。在他的计数法中,每个数字的位数都是相同的(使用相同个数的字母),英文字母按原先的顺序,排在前面的字母小于排在它后面的字母。我们把这样的“数字”称为Jam数字。在Jam数字中,每个字母互不相同,而且从左到右是严格递增的。每次,Jam还指定使用字母的范围,例如,从2到10,表示只能使用{b,c,d,e,f,g,h,i,j}这些字母。如果再规定位数为5,那么,紧接在Jam数字“bdfij”之后的数字应该是“bdghi”。(如果我们用U、V依次表示Jam数字“bdfij”与“bdghi”,则U<V< span>,且不存在Jam数字P,使U<P<V< span>)。你的任务是:对于从文件读入的一个Jam数字,按顺序输出紧接在后面的5个Jam数字,如果后面没有那么多Jam数字,那么有几个就输出几个。
分析:这题原本的解法是dfs,但数据实在太水,就直接有上一个单词直接往下推,时间复杂度也比dfs更优。
const maxn=30; var s,t,w,i:integer; a:array[1..30] of char; procedure init; var i:integer; begin readln(s,t,w); for i:=1 to w do read(a[i]); end; procedure print; var i:integer; begin for i:=1 to w do write(a[i]); writeln; end; procedure main; var i,j,k:integer; begin if a[w]<>chr(t+97-1) then j:=w else begin j:=w; while (j>0) and (a[j]=chr(t-(w-j)+97-1)) do dec(j); if j=0 then exit; end; a[j]:=chr(ord(a[j])+1); for i:=j+1 to w do a[i]:=chr(ord(a[i-1])+1); print; end; begin init; for i:=1 to 5 do main; end.