pascal 火柴棒等式.哎.vari,j,ans,k,n:longint;a:array[0..19]of longint;procedure yuchuli;begina[0]:=6; a[1]:=2;a[2]:=5; a[3]:=5;a[4]:=4; a[5]:=5;a[6]:=6; a[7]:=3;a[8]:=7; a[9]:=6;end;function aa(c:longint):longint;vark:longint;ans1:longint;begini

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/09 08:39:57
pascal 火柴棒等式.哎.vari,j,ans,k,n:longint;a:array[0..19]of longint;procedure yuchuli;begina[0]:=6; a[1]:=2;a[2]:=5; a[3]:=5;a[4]:=4; a[5]:=5;a[6]:=6; a[7]:=3;a[8]:=7; a[9]:=6;end;function aa(c:longint):longint;vark:longint;ans1:longint;begini

pascal 火柴棒等式.哎.vari,j,ans,k,n:longint;a:array[0..19]of longint;procedure yuchuli;begina[0]:=6; a[1]:=2;a[2]:=5; a[3]:=5;a[4]:=4; a[5]:=5;a[6]:=6; a[7]:=3;a[8]:=7; a[9]:=6;end;function aa(c:longint):longint;vark:longint;ans1:longint;begini
pascal 火柴棒等式.哎.
var
i,j,ans,k,n:longint;
a:array[0..19]of longint;
procedure yuchuli;
begin
a[0]:=6; a[1]:=2;
a[2]:=5; a[3]:=5;
a[4]:=4; a[5]:=5;
a[6]:=6; a[7]:=3;
a[8]:=7; a[9]:=6;
end;
function aa(c:longint):longint;
var
k:longint;
ans1:longint;
begin
if c

pascal 火柴棒等式.哎.vari,j,ans,k,n:longint;a:array[0..19]of longint;procedure yuchuli;begina[0]:=6; a[1]:=2;a[2]:=5; a[3]:=5;a[4]:=4; a[5]:=5;a[6]:=6; a[7]:=3;a[8]:=7; a[9]:=6;end;function aa(c:longint):longint;vark:longint;ans1:longint;begini
怎么了