題目描述
給你n根火柴棍，你可以拼出多少個形如「a+b=c」的等式？等式中的a、b、c是用火柴棍拼出的整數（若該數非零，則最高位不能是0）。用火柴棍拼數字0-9的拼法如圖所示：
注意：加號與等號各自需要兩根火柴棍
如果a≠b，則a+b=c與b+a=c視為不同的等式（a、b、c>=0）
n根火柴棍必須全部用上
輸入輸出格式
輸入格式：
輸入檔案matches.in共一行，又乙個整數n（n<=24）。
輸出格式：
輸出檔案matches.out共一行，表示能拼成的不同等式的數目。
輸入輸出樣例
輸入樣例#1：
樣例輸入1：
14 樣例輸入2：
18 輸出樣例#1：
樣例輸出1：
2 樣例輸出2：
9 說明
【輸入輸出樣例1解釋】
2個等式為0+1=1和1+0=1。
【輸入輸出樣例2解釋】
9個等式為：
0+4=4
0+11=11
1+10=11
2+2=4
2+7=9
4+0=4
7+2=9
10+1=11
11+0=11
因為等號、加號各需2個火柴棒，那麼n根火柴棒中只有n-4根用來擺數字，而n最大只有24，那麼我們可以大概求出數字的最大值，因為7和1所用的火柴棒最少，而771+1=772用了19根火柴棒，1111+1=1112用了21根火柴棒，所以我們只要列舉1到771即可。
const cost:array[0..9]of longint=(6,2,5,5,4,5,6,3,7,6);
var n,ans:longint;
procedure
init;
begin
readln(n);
n:=n-4;
end;
procedure
main;
var i,j,x,a,b,c:longint;
begin
ans:=0;
for i:=0
to771
dobegin
x:=i;a:=0;
if x=0
then a:=a+cost[x];
while x<>0
dobegin
a:=a+cost[x mod
10];
x:=x div
10; end;
if a<=n-4
then
for j:=0
to771
dobegin
x:=j;b:=0;
if x=0
then b:=b+cost[x];
while x<>0
dobegin
b:=b+cost[x mod
10];
x:=x div
10; end;
if a+b>n-2
then
continue;
x:=i+j;c:=0;
if x=0
then c:=c+cost[x];
while x<>0
dobegin
c:=c+cost[x mod
10];
x:=x div
10; end;
if a+b+c=n then inc(ans);
end;
end;
end;
procedure
print;
begin
write(ans);
end;
begin
init;
main;
print;
end.
洛谷P1149 火柴棒等式
題目 題目描述 給你n根火柴棍，你可以拼出多少個形如 a b ca b c 的等式？等式中的aa bb cc是用火柴棍拼出的整數 若該數非零，則最高位不能是00 用火柴棍拼數字0 90 9的拼法如圖所示 注意 加號與等號各自需要兩根火柴棍 如果a b，則a b c與b a c視為不同的等式 a,b,...
洛谷P1149 火柴棒等式
給你n根火柴棍，你可以拼出多少個形如 a b ca b c 的等式？等式中的aa bb cc是用火柴棍拼出的整數 若該數非零，則最高位不能是00 用火柴棍拼數字0 90 9的拼法如圖所示 注意 加號與等號各自需要兩根火柴棍 如果a ba b，則a b ca b c與b a cb a c視為不同的等式...
洛谷 P1149 火柴棒等式
給你n根火柴棍，你可以拼出多少個形如 a b c 的等式？等式中的a b c是用火柴棍拼出的整數 若該數非零，則最高位不能是0 用火柴棍拼數字0 9的拼法如圖所示 注意 加號與等號各自需要兩根火柴棍 如果a b，則a b c與b a c視為不同的等式 a,b,c 0 n根火柴棍必須全部用上 輸入格式...