第９話 引き算プログラム解説その４
を実現するプログラムエンジン核心部分再掲
For i = 0 To mx - 1
If d(i) < e(i) Then
For j = i + 1 To mx - 1
If d(j) > 0 Then
d(j) = d(j) - 1
Exit For
Else
d(j) = n - 1
End If
Next
d(i) = d(i) + n
End If
c(i) = d(i) - e(i)
Next
参考ダウンロード添付ファイル
解説その３
i = 2 までで、
↓
↓
↓
が実現できました。
４巡目のループに入ります。
i = 3 のとき、
d(3) = 6 e(3) = 6
d(i) ≧ e(i)ですから、
c(i) = d(i) - e(i)
すなわち
c(3) = d(3) - e(3)
が実行され、
c(3) = 6 - 6 = 2
となります。
これで、
↓
までが実現できて５巡目に入ります。
i = 4 のとき、
d(4) = 6 e(4) = 1
d(i) ≧ e(i)ですから、
c(i) = d(i) - e(i)
すなわち
c(4) = d(4) - e(4)
が実行され、
c(4) = 6 - 1 = 5
となります。
これで、
↓
までが実現できて６巡目に入ります。
i = 5 のとき、
d(5) = 4 e(5) = 4
d(i) ≧ e(i)ですから、
c(i) = d(i) - e(i)
すなわち
c(5) = d(5) - e(5)
が実行され、
c(5) = 4 - 4 = 0
となります。
これで、
↓
までが実現できて７巡目に入ります。
