tretu手機為什麼這么貴

① visual foxpro菜鳥編程問題

第一個問題 計算T=1!+2!+…+10！
set talk off
T=0
for i=1 to 10
? ss(i)
T = T + ss(i)
endf
? T
retu

第二個問題 有一個數列，前兩個數是1,1，第三個數是前兩個數之和，以後每個數都是其前兩個數之和。要求輸出此數列的第30個數。
set talk off
a = 1
b = 1
for i=3 to 30
c = a + b
a = b
b = c
endf
? c
retu

function ss(x)
y=1
for j=1 to x
y=y*j
endf
retu y

第三個問題 如何用VF語言解釋大小寫函數LOWER和UPPER
LOWER()函數，將字元表達式中所有的大寫字母（A-Z）轉換為小寫字母（a-z）。字元表達式中的其他字元保持不變。
UPPER()函數，將字元表達式中所有的小寫字母（a-z）轉換為大寫字母（A-Z）。字元表達式中的其他字元保持不變。