主题：输入下列图形
xiaoshidu
[专家分：120] 发布于 2009-06-27 17:35:00
输出下列图形
1 21
2 3 15 20
4 5 6 10 14 19
7 8 9 10 6 9 13 18
11 12 13 14 15 3 5 8 12 17
16 17 18 19 20 21 1 2 4 7 11 16
这是一个连的图形，程序怎麽编？[em5]30分
回复列表 （共4个回复）
沙发
905482852 [专家分：380] 发布于 2009-06-30 10:30:00
you dian nan !!!!!!!!!!!!!!!!!
板凳
xiaoshidu [专家分：120] 发布于 2009-06-30 17:56:00
提示一下，用tab来做
3 楼
phile [专家分：2310] 发布于 2009-07-01 11:03:00
简单
是两个一起输出么？
是的话程序如：
CLS
INPUT N
M = (1 + N) * N / 2
P = N
Y = N
FOR I = 1 TO N
PRINT TAB(3);
FOR J = 1 TO I
K = K + 1
PRINT USING "###"; K;
NEXT J
PRINT TAB(N ^ 2 + N - I * 3);
L = M
H = P
FOR J = 1 TO I
PRINT USING "###"; L;
L = L + H
H = H + 1
NEXT J
P = P - 1
M = M - Y
Y = Y - 1
PRINT
NEXT I
绝对正确
4 楼
xiaoshidu [专家分：120] 发布于 2009-07-04 11:13:00
很对，和老师讲的一模一样~~~~~~~~~~~~~~
我来回复
您所在位置：