- 169 名前：デフォルトの名無しさん mailto:sage [2007/06/17(日) 18:57:32 ]
- >>156
(2)
For i = 1 To 19 Step 2: sum = sum + i: Next: Exit For
(3)
Select Case x
Case 1: sum = sum + 1
Case 2: sum = sum + 4
Case 3: sum = sum + 9
Case 4: sum = sum + 16
Case 5: sum = sum + 25
Case 6: sum = sum + 36
Case 7: sum = sum + 49
Case 8: sum = sum + 64
Case 9: sum = sum + 81
Case 10: sum = sum + 100
End Select
これでいーだろ
まじめに(3)のヒントだすなら「＾2」
