主题:请各位大虾指教!
163111511
[专家分:90] 发布于 2005-07-26 19:57:00
NICOMACHUS定理:任意一个整数的立方都可以写成一串连续奇数之和,例如:
1^3=1
2^3=3+5+8
3^3=7+9+11=27
4^3=13+15+17+19=64
......
求源程序!
请各位大虾指教!
回复列表 (共4个回复)
沙发
moz [专家分:37620] 发布于 2005-07-26 22:13:00
deflng a-z
input n
dim s(n)
p=n*n
s(0)=n*n-n-1
for i=1 to n
s(i)=s(i-1)+2
print s(i);
next
板凳
wangx [专家分:0] 发布于 2005-12-13 14:58:00
[em1]t: CLS
x = x + 1
CIRCLE (x, y), r, 1
RETURN
e: CLS
y = y + 1
CIRCLE (x, y), r, 1
RETURN
g: CLS
x = x - 1
CIRCLE (x, y), r, 1
RETURN
q: CLS
y = y - 1
CIRCLE (x, y), r, 1
RETURN
3 楼
zhangyang9007 [专家分:80] 发布于 2006-01-20 11:16:00
input n
k=0
for i=1 to n
print i;"=";
k=k+2^(i-1)
for j=1 to k step+2
print "+";j;
next j
next i
end
4 楼
xiaophai [专家分:20] 发布于 2006-01-20 20:20:00
前面的因为能力问题看不懂.怎么最后的一个感觉是错的呢!!!
我来回复