问题:大家帮帮我吧 我VB编程一点都不懂 可是要考试 我把重点问题列下来了 谁能教我一下啊 谢谢了
1/ 千百位数处已经变得模糊不清,其他位呢?
2/ arr = Array(16, 8947, 7584, 9384, 98347, 75, 3, 72618, 8473) n = UBound(arr) For i = 0 To n k = i For j = i + 1 To n If arr(k) > arr(j) Then k = j Next j If k <> i Then t = arr(k): arr(k) = arr(i): arr(i) = t Print arr(i) Next i
3/ a = 1 b = 1 For i = 3 To 15 t = a + b a = b b = t Next i Print b 如果你对大家帮帮我吧 我VB编程一点都不懂 可是要考试 我把重点问题列下来了 谁能教我一下啊 谢谢了这个问题有好的意见或
建议,请留言
|