Dim A，B，C
A = 10
B = 3
C = f(A) / (f(B) * f(A - B))
打印C
末端接頭
私有函數f(n)
將I標註為整數
f = 1
對於I = 1到n
f = f * I
接下來我
結束功能