program expandnew；
var
p1,p2,p3:integer；
ch:ansistring；
chresult:array[1..8000000]of char；
lin:char；
i,js,zs,j,xh,zjs:integer；
procedure printf；
var pr,pr2:integer；
begin
if (p3=1)and(p1=1) then
begin
for pr:=1 to zs do
for pr2:=1 to p2 do
write(chresult[pr])；
end；
if (p3=2)and(p1=1) then
begin
for pr:=zs downto 1 do
for pr2:=1 to p2 do
write(chresult[pr])；
end；
if (p3=1)and(p1=2) then
begin
for pr:=1 to zs do
for pr2:=1 to p2 do
write(upcase(chresult[pr]))；
end；
if (p3=2)and(p1=2) then
begin
for pr:=zs downto 1 do
for pr2:=1 to p2 do
write(upcase(chresult[pr]))；
end；
if p1=3 then
begin
for pr:=1 to zs do
for pr2:=1 to p2 do write(’*’)；
end；
end；{printf end}
procedure pd(a,b:char)；
begin
i:=1；
if( ((ord(a) >= 97)and(ord(a) <= 122))
and((ord(b) >= 48)and(ord(b) <= 57)) )
or
( ((ord(b) >= 97)and(ord(b) <= 122))
and((ord(a) >= 48)and(ord(a) <= 57)) )
then {left and right is different}
write(’-’)
else
if ord(a) >= ord(b) then write(’-’)
else
if (ord(a)+1) = ord(b) then
else
begin
while ord(a)+i < ord(b) do
begin
chresult[i]:=chr(ord(a)+i)；
i:=i+1；
end；
zs:=i-1；
printf；
end；{if end}
end； {pd end}
begin
readln(p1,p2,p3)；
read(ch)；
zjs:=length(ch)；js:=0；
ch[zjs+1]:=’ ’；
repeat
while ch[js+1]=’-’ do
begin
if (ch[js+2]<>’ ’)and(js<>0) then pd(ch[js],ch[js+2])
else write(’-’)；
break；
end；
if (ch[js+1]<>’-’)and(ch[js+1]<>’ ’) then write(ch[js+1])；
inc(js)；
until js>zjs；
readln；
end.
输入：
1 1 1
2-43-sdf-ewr0-j-9re-j0g-9e0-9as-d09jf-9asdjf0q-w-ejr0q-59jdsnf-9z-x9v0-sd9fn--q
输出:
2343-sdf-ewr0-j-9refghij0g-9e0123456789as-d09jf-9asdjf0qrstuvw-ejr0q-59jdsnf-9z-x9v0-sd9fn--q
第六个测试数据：
输入：
2 8 2
--09-8-w-er-7h-08w-e7-hc-r890-q7w-eh-rc98-07-q8-ewr-8h-c-8-294-5-dsf--k-h-2-48-3k-h-sd-fq-a-
输出：
--09-8-w-er-7h-08w-e7-hcQQQQQQQQPPPPPPPPOOOOOOOONNNNNNNNMMMMMMMMLLLLLLLLKKKKKKKKJJJJJJJJIIIIIIIIHHHHHHHHGGGGGGGGFFFFFFFFEEEEEEEEDDDDDDDDr890-q7w-ehQQQQQQQQPPPPPPPPOOOOOOOONNNNNNNNMMMMMMMMLLLLLLLLKKKKKKKKJJJJJJJJIIIIIIIIrc98-07-q8-ewr-8h-c-8-2945-dsf--k-h-23333333348-3k-hRRRRRRRRQQQQQQQQPPPPPPPPOOOOOOOONNNNNNNNMMMMMMMMLLLLLLLLKKKKKKKKJJJJJJJJIIIIIIIIsdEEEEEEEEfq-a-
自己研究吧。