博客
关于我
强烈建议你试试无所不能的chatGPT,快点击我
Jam的计数法
阅读量:4556 次
发布时间:2019-06-08

本文共 1900 字,大约阅读时间需要 6 分钟。

Jam的计数法

count.pas/c/cpp

【问题描述】

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,且不存在Jam数字P,使U<P<V)。你的任务是:对于从文件读入的一个Jam数字,按顺序输出紧接在后面的5个Jam数字,如果后面没有那么多Jam数字,那么有几个就输出几个。

【输入文件】

输入文件count.in 有2行,第1行为3个正整数,用一个空格隔开:

s t w

(其中s为所使用的最小的字母的序号,t为所使用的最大的字母的序号。w为数字的位数,这3个数满足:1≤s<t≤26, 2≤w≤t-s )

第2行为具有w个小写字母的字符串,为一个符合要求的Jam数字。

所给的数据都是正确的,不必验证。

【输出文件】

输出文件count.out 最多为5行,为紧接在输入的Jam数字后面的5个Jam数字,如果后面没有那么多Jam数字,那么有几个就输出几个。每行只输出一个Jam数字,是由w个小写字母组成的字符串,不要有多余的空格。

【输入样例】

2 10 5

bdfij

【输出样例】

bdghi

bdghj

bdgij

bdhij

befgh

 

思路:

本来用不断加一的方法打了暴力【傻逼的做法。。。

其实正解就是生成一个大于给出的字符串的组合【保证唯一和严格递增】,每个元素在s到t之间

然后输出就可以了。。。。

 

代码:

1 program count; 2 const 3   inf='count.in'; 4   outf='count.out'; 5 var 6   ss,tt,n,j,tot:longint; 7   s,t:char; 8   check:boolean; 9   first,ans:string;10   b:array['a'..'z'] of boolean;11 12 procedure init;13 begin14    assign(input,inf);    assign(output,outf);15    reset(input);         rewrite(output);16 17    fillchar(b,sizeof(b),true);18 19    readln(ss,tt,n);20    s:=chr(ord(ss)+96);21    t:=chr(ord(tt)+96);22    readln(first);23 end;24 25 procedure outgo;26 begin27   close(input);28   close(output);29   halt;30 end;31 32 procedure printf;33 begin34   if ans<=first then exit;35   if tot=5 then outgo;36   for j:= 1 to n do37     write(ans[j]);38   writeln;39   inc(tot);40 end;41 42 procedure dfs(d:longint;last:char);43 var44   i:char;45 begin46   for i:= last to t do47    begin48      ans:=ans+i;49      if d=n then printf50        else dfs(d+1,chr(ord(ans[d])+1));51      ans:=copy(ans,1,d-1);52    end;53 end;54 55 begin56     init;57     dfs(1,first[1]);58     outgo;59 end.

转载于:https://www.cnblogs.com/bobble/p/6435150.html

你可能感兴趣的文章
HDU-1878 欧拉回路 判定是否存在欧拉回路
查看>>
大道至简读后感
查看>>
[New Portal]Windows Azure Virtual Machine (22) 使用Azure PowerShell,设置Virtual Machine Endpoint...
查看>>
hdu 1404
查看>>
ACM/ICPC 之 欧拉回路两道(POJ1300-POJ1386)
查看>>
避免死锁的银行家算法
查看>>
resultMap自定义某个javaBean的封装规则代码
查看>>
oracle tkprof 工具详解
查看>>
[Django实战] 第3篇 - 用户认证(初始配置)
查看>>
简单逆向分析修改软件标题
查看>>
20180607jquery实现切换变色
查看>>
框架大集合
查看>>
Centos7单网卡带VLAN多IP配置
查看>>
element-ui radio 再次点击取消选中
查看>>
hibernate9
查看>>
一大波放鄙视接近中
查看>>
任意类型转换为IntPtr
查看>>
$.each 和$(selector).each()的区别
查看>>
11-EasyNetQ之多态发布和订阅
查看>>
iOS App 的运行周期
查看>>