3,4,5,6,7,8,11,12,13,14,15,16,17,18,21,22,23,24,25,26,27,28,30,31,32,33从中选6个的组合一一排列
答案:6 悬赏:70
解决时间 2021-01-29 10:01
- 提问者网友:嘚啵嘚啵
- 2021-01-28 12:14
3,4,5,6,7,8,11,12,13,14,15,16,17,18,21,22,23,24,25,26,27,28,30,31,32,33从中选6个的组合一一排列
最佳答案
- 二级知识专家网友:夜余生
- 2021-01-28 13:18
var
a:array[1..33]of integer=(3,4,5,6,7,8,11,12,13,14,15,16,17,18,21,22,23,24,25,26,27,28,30,31,32,33);
i,j,m,n,k,y:integer;
begin
for i:=1 to 33 do
for j:=1 to 33 do
for m:=1 to 33 do
for n:=1 to 33 do
for k:=1 to 33 do
for y:=1 to 33 do
writeln(a[i],a[j],a[m],a[n],a[k],a[y]);
end.
(上面这个,每个数之间是没有空开的)
var
a:array[1..33]of integer=(3,4,5,6,7,8,11,12,13,14,15,16,17,18,21,22,23,24,25,26,27,28,30,31,32,33);
i,j,m,n,k,y:integer;
begin
for i:=1 to 33 do
for j:=1 to 33 do
for m:=1 to 33 do
for n:=1 to 33 do
for k:=1 to 33 do
for y:=1 to 33 do
writeln(a[i],' ',a[j],' ',a[m],' ',a[n],' ',a[k],' ',a[y]);
end.
(这个是有空de)
pascal的
a:array[1..33]of integer=(3,4,5,6,7,8,11,12,13,14,15,16,17,18,21,22,23,24,25,26,27,28,30,31,32,33);
i,j,m,n,k,y:integer;
begin
for i:=1 to 33 do
for j:=1 to 33 do
for m:=1 to 33 do
for n:=1 to 33 do
for k:=1 to 33 do
for y:=1 to 33 do
writeln(a[i],a[j],a[m],a[n],a[k],a[y]);
end.
(上面这个,每个数之间是没有空开的)
var
a:array[1..33]of integer=(3,4,5,6,7,8,11,12,13,14,15,16,17,18,21,22,23,24,25,26,27,28,30,31,32,33);
i,j,m,n,k,y:integer;
begin
for i:=1 to 33 do
for j:=1 to 33 do
for m:=1 to 33 do
for n:=1 to 33 do
for k:=1 to 33 do
for y:=1 to 33 do
writeln(a[i],' ',a[j],' ',a[m],' ',a[n],' ',a[k],' ',a[y]);
end.
(这个是有空de)
pascal的
全部回答
- 1楼网友:思契十里
- 2021-01-28 17:12
2
- 2楼网友:醉吻情书
- 2021-01-28 16:47
你才
- 3楼网友:十鸦
- 2021-01-28 15:54
1
- 4楼网友:何以畏孤独
- 2021-01-28 15:23
05 08 13 21 23 33 01
- 5楼网友:猎心人
- 2021-01-28 14:04
I don‘t know
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯