首页 > 代码库 > 1833: [ZJOI2010]count 数字计数 - BZOJ
1833: [ZJOI2010]count 数字计数 - BZOJ
Description
给定两个正整数a和b,求在[a,b]中的所有整数中,每个数码(digit)各出现了多少次。
Input
输入文件中仅包含一行两个整数a、b,含义如上所述。
Output
输出文件中包含一行10个整数,分别表示0-9在[a,b]中出现了多少次。
Sample Input
1 99
Sample Output
9 20 20 20 20 20 20 20 20 20
HINT
30%的数据中,a<=b<=10^6;
100%的数据中,a<=b<=10^12。
首先把这个问题变成f(b)-f(a-1)
然后就是比较简单的数位dp
f[i,j]表示长度为i以j开头0到9各个数字的出现次数
先算出全部的,再减去不合法的
不合法的就是枚举,减去从第i位开始超出n的情况,注意减去比第i位更高的数字(一开始就这样WA的)
1 type 2 node=array[0..9]of int64; 3 var 4 f:array[0..15,0..9]of node; 5 ten:array[0..15]of int64; 6 a,b:int64; 7 8 operator +(a,b:node)c:node; 9 var 10 i:longint; 11 begin 12 for i:=0 to 9 do 13 c[i]:=a[i]+b[i]; 14 end; 15 16 operator -(a,b:node)c:node; 17 var 18 i:longint; 19 begin 20 for i:=0 to 9 do 21 c[i]:=a[i]-b[i]; 22 end; 23 24 operator *(a:node;b:int64)c:node; 25 var 26 i:longint; 27 begin 28 for i:=0 to 9 do 29 c[i]:=a[i]*b; 30 end; 31 32 function ff(x:int64):node; 33 var 34 s:array[0..15]of longint; 35 i,j,len:longint; 36 fff:node; 37 begin 38 fillchar(ff,sizeof(ff),0); 39 fillchar(fff,sizeof(fff),0); 40 for i:=1 to 13 do 41 begin 42 s[i]:=x mod 10; 43 x:=x div 10; 44 end; 45 for i:=13 downto 1 do 46 if s[i]<>0 then break; 47 len:=i; 48 for i:=1 to len do 49 for j:=1 to 9 do 50 ff:=ff+f[i,j]; 51 for i:=len downto 1 do 52 begin 53 for j:=s[i]+1 to 9 do 54 ff:=ff-f[i,j]-fff*ten[i]; 55 inc(fff[s[i]]); 56 end; 57 end; 58 59 procedure print(a:node); 60 var 61 i:longint; 62 begin 63 for i:=0 to 8 do 64 write(a[i],‘ ‘); 65 write(a[9]); 66 end; 67 68 procedure main; 69 var 70 i,j,k:longint; 71 begin 72 read(a,b); 73 ten[1]:=1; 74 for i:=2 to 13 do 75 ten[i]:=ten[i-1]*10; 76 for i:=1 to 13 do 77 for j:=0 to 9 do 78 begin 79 for k:=0 to 9 do 80 f[i,j]:=f[i,j]+f[i-1,k]; 81 inc(f[i,j,j],ten[i]); 82 end; 83 print(ff(b)-ff(a-1)); 84 end; 85 86 begin 87 main; 88 end.
声明:以上内容来自用户投稿及互联网公开渠道收集整理发布,本网站不拥有所有权,未作人工编辑处理,也不承担相关法律责任,若内容有误或涉及侵权可进行投诉: 投诉/举报 工作人员会在5个工作日内联系你,一经查实,本站将立刻删除涉嫌侵权内容。