13:34 にページが自動更新されます。
Example17 PAD
選択肢
| (1) | Vector(i) = Cells(4, i + 1) | (2) | Do i = 1 To n Step 1 | (3) | Loop i = 1 To n Step 1 |
| (4) | End Main | (5) | Ans() = Vector() | (6) | End Sub |
| (7) | Dim Vector() As Double : ReDim Vector(1 To n) | (8) | Dim Ans() As Double | (9) | Sub End |
| (10) | Loop | (11) | Dim n As Long : n = Cells(2, 2) | (12) | Next i |
| (13) | Cells(6, i + 1) = Vector(i) | (14) | End Main() | (15) | For i = 1 To n Step 1 |
| (16) | Cells(5, i + 1) = Ans(i) | (17) | Do | (18) | Dim i As Long |
| (19) | Vector(1) = Cells(3, 2) |