基礎課題４-１７

コンポーネント Name
上のスピンエディット SpinEditResult
下のボタン ButtonCalc

このプログラムで 1+2+3+4+5 を計算させて結果を表示させます。下線部を埋めてください。
４-８ 繰り返し処理(4)
―カウント用変数を使ったプログラム―


☆ 総目次へ　★　第4章目次へ　★　前節へ　★　次節へ　☆

☆　『Delphi入門』　４−８繰り返し処理（4）-カウント用変数を使ったプログラム-　☆
次のようなフォームのプログラムを作ってください。(最初の値は「0」にしておいて下さい。)
応用課題４-３

右は、かけ算の九九表です。この全ての数の合計を求めるプログラムを作って下さい。
　1 2 3 4 5 6 7 8 9
　2 4 6 8 10 12 14 16 18
　3 6 9 12 15 18 21 24 27
　4 8 12 16 20 24 28 32 36
　5 10 15 20 25 30 35 40 45
　6 12 18 24 30 36 42 48 54
　7 14 21 28 35 42 49 56 63
　8 16 24 32 40 48 56 64 72
　9 18 27 36 45 54 63 72 81
ヒント　例えば、1行目(1番上の横の並び)の和を求めることはすでにできるはずです。これに、2行目、3行目の和を順次加えて行けばよいのです。

すると・・・

最終的には「4-2 if文の中のif文」のように「for文の中の for文」という形になるはずです。

これができたら大したもの!
私の体験談
この問題もまた難しいです。大したもの！って言われたいけど・・・。という感じです。
for文の中のfor文だからfor文を2回使うことまでは、誰でもわかりますよね。
縦の数字は９まで、横の数字も9までだから、縦のカウント用変数と横のカウント用変数をそれぞれ用意して、そのカウント用変数を掛けながら、その値を足していくといいことになります。
応用課題４-２

左のピラミッドは、1番上の段は石が 12=1 個、上から2段目は 22=4 個、上から3段目は 32=9個です。このピラミッドが5段になったときの石の個数を求めるプログラムを作りなさい。

また、このプログラムを改良して、

基礎課題４-２０

1+3+5+7+… を計算するプログラムを、for 文を使って作って下さい。(最初の値は「0」にしておきます。)
基礎課題４-１９

2+4+6+8+… を計算するプログラムを、for 文を使って作って下さい。

基礎課題４−１９　解答
基礎課題４-１８

右のプログラムを改良して、5 までではなく任意の数までの和を求める (どこまで足すかを指定できる) プログラムを、for 文を使って作って下さい。

基礎課題４−１８　解答
i は何回目の繰り返しかを数える変数です。これを文法用語では「制御変数」と呼びますが、ここでは分かりやすく「カウント用変数」と呼びましょう。{　}の間を1回実行するたびに、i は1つずつ増えます。この性質を利用すると、自然数の和などを簡単に求めることができます
基礎課題４−１７　解答
応用課題４−２　解答
応用課題４−３　解答
基礎課題４−２０　解答
ピラミッドの段数を入力して「計算」ボタンを押したら
答を出力するプログラムを作って下さい。
☆　『Delphi入門』　４−８繰り返し処理（4）-カウント用変数を使ったプログラム-　☆

☆ 総目次へ　★　第4章目次へ　★　前節へ　★　次節へ　☆