2017.6.6测试 题一 火柴

火  柴

提交文件：match.exe

输入文件：match.in

输出文件：match.out

 

问题描述：

图1

小明在家无聊时会拿火柴去拼数字，每个数字的拼法如图1所示。有一天小明突发奇想，想出一个玩法。他把所有火柴分为A，B，C三堆，然后用光每一堆的火柴各拼出一个数(用A，B，C的火柴拼出的数分别是a，b，c)，这三个数都不能有前导0(0本身除外)，再选择一个运算符op(+，-，*，/，其中/是整数除)，使得a op b = c。因为小明只学过0到999的数，所以只能拼0到999这1000个数。

小明玩着玩着想到，对于火柴堆的一种分法，能得到多少个不同的等式呢？你能回答这个问题吗？

 

输入格式：

输入只有一行，包含三个整数，分别是A，B，C三堆火柴的火柴数。

 

输出格式：

输出只有一行，包含一个整数，为所求的等式的个数。

输入样例：	输出样例：
4 5 8	2

 

数据范围：

对于所有的数据，2 ≤ A，B，C ≤ 21。

 

样例提示：

样例中两个等式分别是4 + 71 = 75和11 + 5 = 16。

var
 h:array[0..9] of byte=(6,2,5,5,4,5,6,3,7,6);//慢慢数火柴棍，打表
 a,b,c,n,i,j,ans:longint;
function try(n:longint):longint;//拆数(把x位数拆成x个数)
begin
 try:=0;
 if n=0 then exit(6);//等于0直接出去(0只能在最后)
 while n<>0 do
  begin
   inc(try,h[n mod 10]);//慢慢拆
   n:=n div 10;//被拆就要少了
  end;
end;
begin
 readln(a,b,c);
 for i:=0 to 999 do//直接按题目的上限:999
  for j:=0 to 999 do
   begin
    if (try(i)=a) and (try(j)=b) then//相等时
     begin
      if (i+j<=999) and (try(i+j)=c) then inc(ans);//如果在数据范围内，满足加法等式，等式+1
      if (i>=j) and (try(i-j)=c) then inc(ans);//如果在数据范围内(他顶多会0，不会负数)，满足减法等式，等式+1
      if (i*j<=999) and (try(i*j)=c) then inc(ans);//满足惩罚等式
      if (j<>0) and (try(i div j)=c) then inc(ans);//满足处罚等式(不能被0除)
     end;
   end;
 writeln(ans);
end.