房天下 > 房天下问答 > 业主生活 > 其他
  • 用VB编程求Fibonacci数列的第n项

    提问者:mbwlgwen

    发布于2011-02-13

共1个回答
  • chauwengsang 丨Lv 2
    Private Sub Form_Click() Dim n As Integer n = Val(InputBox("请输入N:")) Dim a, b As Long a = 1: b = 1 For i = 1 To n Print a & " " & b & " "; a = a + b: b = b + a Next iEnd Sub
    +10 2011-02-13 举报
热门人气推荐
免责声明:问答内容均来源于互联网用户,房天下对其内容不负责任,如有版权或其他问题可以联系房天下进行删除。