Example

00:54 にページが自動更新されます。

処理の繰り返し制御

学籍番号
氏　　名
Sub Main() 　Dim S As Long: S = 0 　Dim i As Long 　i = 1 　S = S + i '① 　i = i + 1 '② 　S = S + i 　i = i + 1 　S = S + i 　i = i + 1 　S = S + i 　i = i + 1 　S = S + i 　i = i + 1 　Cells(3, 2) = S 'SをB3セルに表示 End Sub
①②の処理を 5回繰返す処理について， For-Nextを使ってプログラム (選択肢番号を右の(　)内に入力)しなさい．なお，繰り返し数はLong型変数Nを宣言しで，初期化して用いること．解答枠が余る場合は，上に詰めて入力すること．	Sub Main()
	()
	()
	()
	()
	()
	()
	()
	()
	End Sub

変数の宣言と初期化は：を用いて，1行に記述できる．

\( \displaystyle \text{ Dim a As Long : a = 0 } \impliedby \cases{ \text{ Dim a As Long } \cr \text{ a = 0} } \)

選択肢