これまでに作成した for ループを含むプログラムはすべて汎用とは言えません。ループ本体の繰り返し回数を自分で設定しているためです。
しかし、繰り返し回数が他の値に依存する場合はどうなるでしょうか?例えば、ユーザー自身がサイクルの繰り返し回数を設定したい。
この場合はどうすれば
良いのでしょうか？
すべてがとてもシンプルです。数値の開始値と終了値の代わりに、ユーザーが計算または設定できる任意の変数を使用できます。
たとえば、ユーザーがキーボードから変数 n の値を入力した場合、1 から n までの数値の 2 乗を表示する必要があります。
プログラムは次のようになります。
<プレ>
変数 i, n :整数; // ダッシュ中;ループ変数、n - 二乗を計算する最大数
始める
読み取り (n); // キーボードからnを入力
for i := 1 to n do // ループ: for all i from 1 to n - 変数 i は 1 から n までの値を順番に取得します
writeln('クヴァドラ・チスラ', i, ' レイヴン', i * i); // 数値の 2 乗を特定の形式で出力し、新しい行に移動する
終わり。
ループに入ると、ステートメント i := 1 が実行され、ステップごとに変数 i が 1 (to) ずつ増加します。ループは、条件 i <= n が true の間実行されます。ループの本体では、唯一の出力ステートメントが、指定された形式に従って、数値自体とその四角形を画面に出力します。
二乗またはその他の低指数の場合は、乗算を使用することをお勧めします。
プログラムを実行し、変数 n のさまざまな値を使用した結果を確認します。