请看看题解:
program v1318(input,output);
const maxn=26;
var i,j,k,s,t,w:integer;
a:array[1..maxn] of integer;
ch:char;
begin
read(s,t,w);
readln;
for i:=1 to w do begin
read(ch);
a:=ord(ch)-ord('a')+1;
end;
for i:=1 to 5 do begin
k:=w;
while a[k]+1>t+k-w do dec(k);
inc(a[k]);
for j:=k+1 to w do a[j]:=a[j-1]+1;
for j:=1 to w do begin
ch:=chr(ord('a')-1+a[j]);
write(ch);
end;
writeln;
end;
end.