0

問題は、入力された値を逆の順序で列挙するようにプログラムを取得する必要があるコードの下部にあります。インデックスと関係があると思いますか?

Option Explicit On Option Strict On

「著者: マレー スピアーズ」日付: 2012 年 10 月 12 日

'5 つの入力値を受け取り、それらを配列に格納するプログラムを作成します。'次に、数字を逆順に表示します。'次に、平均数と、平均を上回っているすべての数値を表示します。

輸入システム

モジュール値

Sub Main()
    Dim Number(4) as Integer
    Dim Average as Double = 0
    Dim Index as integer
'   
  For Index = 0 to 4
  Console.Write("Enter number: ")
  Number(Index)=Convert.ToInt32(Console.Readline())
  Next Index

'Figure out the average for all the entered values.
Average = (Number(0)+Number(1)+Number(2)+Number(3)+Number(4))/5
Console.Writeline("The average of the numbers is: " &Average)

Console.Write("Numbers that are greater than the average: ")
Index = 4
Do until Index = 0
If Number(Index) > Average then 
Console.Writeline(Number(Index))
End If
Index -=1
Loop


Console.Writeline("Numbers in reverse order: ")
Index = 4
Do while Number(index) > 0
Console.Writeline(Number(Index))
Number(index) -= 1
Loop

End Sub

エンドモジュール

4

2 に答える 2

1

Imo、最も簡単な方法は、数字を入力したときと同じようにループを使用することですが、自分で書いたようにインデックスを逆にします。これが「ステップ-1」の目的です。

For Index As Integer = 4 To 0 Step -1
  Console.Writeline(Number(Index))
Next
于 2012-10-11T23:37:53.420 に答える
1

Step -1後退するために使用します。

For Index = 4 To 0 Step -1
    ' do your thing
Next
于 2012-10-11T23:25:21.783 に答える