2016-09-28 9 views
-1

"開始値と終了値を読み取るプログラムを作成し、この2つの値の間のすべての偶数を配列に格納します。出力n番目の偶数」2つの数字を選択してからn番目の数字を探す

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click 
     number1 = InputBox("Enter first number") 
     number2 = InputBox("enter second number") 

この上の任意のガイダンスははるかに高く評価されるだろう数(n)を選択し、プログラムは、私は完全に失わだはずです。

+1

n1 = n2の場合、カウントは常にゼロになります。なぜそれらを減算していますか?私が考えることができる唯一のn番目の項の数学的シーケンス方程式は、それらの入力が与えられれば5を生成しないので、あなたが何を達成しようとしているのかを少し詳しく説明できますか? 1と10の差は9ですよね?だからどこへジャンプするのはどこから来るのですか?それはシーケンスの第2項ではないので、私はちょっと混乱しています... – soohoonigan

+0

もう一度タスクを見つけました。私はvb.netに新しいので、この1つのタスクと混乱しています。私が与えられた他のものと一緒に。これはちょうど私をバグし始めている –

答えて

1

[OK]を編集すると、今私にとってもっと意味があります。あなたは最初の3つの入力を得る正しい軌道にいました。その後、我々は我々の入力に2つのことを行うためにneeed:

1)利用者は私たちに

2を与えている範囲内であっても番号を取得します)、それは

が存在する場合はn番目の項を返します。

'Get our inputs 
    Dim number1 As Integer = CInt(InputBox("Enter first number")) 
    Dim number2 As Integer = CInt(InputBox("Enter second number")) 
    Dim nthTerm As Integer = CInt(InputBox("Enter Nth Term")) 
    Dim evenNumbers As New List(Of Integer) 

    'Now, we want to get a list of all the even numbers within n1 to n2 range 
    For i As Integer = number1 To number2 
     'if the number divided by 2 has a remainder of 0, then it's an even number 
     If i Mod 2 = 0 Then evenNumbers.Add(i) 
    Next 

    'Now that we have all the even #s, try to return the nth one as long as it exists 
    Try 
     'We substract 1 from the nthTerm entered by used to account for list's 0-based index 
     MsgBox(evenNumbers(nthTerm - 1).ToString) 
    Catch ex As Exception 
     MsgBox("Nth Term out of bounds") 
    End Try 
+0

ありがとう、私は本当にそれがはるかに理解しやすくすることを感謝します。 –

関連する問題