史萊姆論壇 - 查看單個文章

mini · 2004-08-16, 05:58 PM

改了一下
3^3 = 3*3*3

Sub FunX(n)
x=n
for i=1 to n-1
x = x * n
next i
End Sub

1^1 + 2^2 + 3^3

for y=1 to n
z = z + FunX(y)
Next y

2004-08-16, 05:58 PM	#2 (permalink)
mini 管理版主榮譽勳章勳章總數17 UID - 4144 在線等級: 註冊日期: 2002-12-07 文章: 13393 精華: 0 現金: 26689 金幣資產: 3024599 金幣	改了一下 3^3 = 333 Sub FunX(n) x=n for i=1 to n-1 x = x * n next i End Sub 1^1 + 2^2 + 3^3 for y=1 to n z = z + FunX(y) Next y

	送花文章: 2029, 收花文章: 8023 篇, 收花: 26849 次