- ©«¤l
- 352
- ¥DÃD
- 5
- ºëµØ
- 0
- ¿n¤À
- 385
- ÂI¦W
- 0
- §@·~¨t²Î
- windows7
- ³nÅ骩¥»
- vba,vb,excel2007
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2017-1-8
- ³Ì«áµn¿ý
- 2024-3-29
|
¥»©«³Ì«á¥Ñ singo1232001 ©ó 2021-7-28 10:05 ½s¿è
- Function addZ(m, n)
- If m = 0 Then Exit Function
- If i <= n Then addZ = addZ(m + (-1), n) + n
- End Function
- Function Mu(m, n)
- If n = m Then
- Mu = m
- Else
- Mu = addZ(m, Mu(m + 1, n))
- End If
- End Function
- Sub main()
- Debug.Print Mu(2, 6)
- End Sub
½Æ»s¥N½X ¦^´_ 5# n7822123
³o¹DÃD¥Ø¯u¦n ¦³°÷¨ë¿E
ª½±µ¬ð¯}§Úªºª¼¸z
§Ú¥Ø«e¬O¶Ã¼gªº ·§©À¤WÁÙ¬O¦³°ÝÃD
¸ÑÃD Åý§Ú§ó¥[¼ô±x»¼°jªºª±ªk
ÁÙÀò±o¤F³\¦hªº«ä¸ô ·PÁ·PÁÂ
¥Ø«e§Úªºµª®×¦³¨âÓ¯ÊÂI 1.§ä¤£¨ì¦a¤è´¡¤J°j°é 2.¥Î¤W¤F¤@Ót¸¹
¬ã¨s¤F¤TÓ¤p®É¦h °í«ù¤£¤U¥h¤F
¨D¤j¯«¸Ñµª |
|