“12345”问题,请各位大虾帮帮忙! ( 积分: 10 )

  • 主题发起人 主题发起人 kmzbh
  • 开始时间 开始时间
K

kmzbh

Unregistered / Unconfirmed
GUEST, unregistred user!
“12345”五个数。(1)用算法实现下如下数字:123,124,125,134,135,145,234,235,245,345;(2)列出这五个数可以组成的任意三位数,包括[1]中的数字,还有213、312、435等等,
急等,帮帮小弟了!
 
“12345”五个数。(1)用算法实现下如下数字:123,124,125,134,135,145,234,235,245,345;(2)列出这五个数可以组成的任意三位数,包括[1]中的数字,还有213、312、435等等,
急等,帮帮小弟了!
 
http://www.delphibbs.com/keylife/iblog_show.asp?xid=13549
 
a:='12345'
b:='12345'
c:='12345'
for i:=1 to 5do
begin
for j:=i to 5do
begin
for k:=j to 5do
begin
d:=copy(a,i,1)+copy(b,j,1)+copy(c,k,1)
end;
end;
end;
未写完,得到d以后再排列一下,每一个值又可排出2种来。
 
后退
顶部