Basic Pascal Tutorial/Chapter 3/FOR..DO/ja: what changed
Revision 0 to 1. Removed lines have a minus sign; added lines have a plus sign.
Title: Basic Pascal Tutorial/Chapter 3/FOR..DO/ja
| Old | New | Line | |
|---|---|---|---|
| 1 | + | ## Contents | |
| 2 | + | ||
| 3 | + | * 1 FOR...DO Loops (著者: Tao Yue, 状態: 原文のまま修正なし) | |
| 4 | + | * 1.1 Loops | |
| 5 | + | * 1.2 FOR...DO Loop | |
| 6 | + | * 2 See also | |
| 7 | + | ||
| 8 | + | ## FOR...DO Loops (著者: Tao Yue, 状態: 原文のまま修正なし) | |
| 9 | + | ||
| 10 | + | FOR...DO は Pascal におけるループを構成するためのものである。もちろん、まず "ループとは何か?"という疑問が湧くだろう。 | |
| 11 | + | ||
| 12 | + | ### Loops | |
| 13 | + | ||
| 14 | + | ループするとは文や複合文が、ある条件が満たされるまで繰り返し繰り返し実行されることを意味する。 | |
| 15 | + | ||
| 16 | + | 3つのタイプのループがある。 | |
| 17 | + | ||
| 18 | + | * 固定反復(fixed repetition) - 固定された回数のみ反復する | |
| 19 | + | * プリテスト(pretest) - ブール式をテストし、TRUE ならループに入る | |
| 20 | + | * ポストテスト(posttest) - ループを実行し、それからブール式をテストする | |
| 21 | + | ||
| 22 | + | ### FOR...DO Loop | |
| 23 | + | ||
| 24 | + | Pascal においては固定反復が for ループである。一般的な形式は次の通りである。 | |
| 25 | + | ``` | |
| 26 | + | for index := 初期値Low to 終了値High do | |
| 27 | + | 文; | |
| 28 | + | ``` | |
| 29 | + | ||
| 30 | + | インデックス変数は **順序型** データでなくてはならない。このインデックスはループ本体の中で計算に用いられるが、その値は変えることはできない。たとえば、 `count:=5` とするとプログラムに例外を引き起こす。 | |
| 31 | + | ||
| 32 | + | Pascal では、 `for` ループは1の増加のみがカウントできる。 ループは _break_ 文で中断できる。 インデックスを利用した例を次に示す。 | |
| 33 | + | ``` | |
| 34 | + | sum := 0; | |
| 35 | + | for count := 1 to 100 do | |
| 36 | + | begin | |
| 37 | + | sum := sum + count; | |
| 38 | + | if sum = 38 then break; | |
| 39 | + | end; | |
| 40 | + | ``` | |
| 41 | + | ||
| 42 | + | コンピュータは、終了になるまで延々合計を求め続ける。しかし、それは数学者ガウスが簡単な近道で合計を求めたやり方よりもはるかに速い (`1+100 = 101. 2+99 = 101`。パターンがわかっただろうか? 100の数字があるので、そのパターンが50回繰り返される `101*50 = 5050`。これは高等数学ではないし、ガウスに由来するというのもたぶん作り話だろう)。 | |
| 43 | + | ||
| 44 | + | `for-to-do` ループでは、初期値は終了値よりも小さくなくてはならない。さもないとループ自体が実行されない。もし、カウントダウンしたいのなら、 `for-downto-do` ループを使うべきである。 | |
| 45 | + | ``` | |
| 46 | + | for index := 初期値High downto 終了値Low do | |
| 47 | + | 文; | |
| 48 | + | ``` | |
| 49 | + | ||
| 50 | + | ## See also | |
| 51 | + | ||
| 52 | + | [[Basic Pascal Tutorial/Chapter 3/WHILE..DO/ja|While ...Do loops/ja]] | |
| 53 | + | ||
| 54 | + | [Repeat... Until loops/ja](</index.php?title=Until/ja&action=edit&redlink=1> "Until/ja \(page does not exist\)") | |
| 55 | + | ||
| 56 | + | [For... in loops/ja](</index.php?title=for-in_loop/ja&action=edit&redlink=1> "for-in loop/ja \(page does not exist\)") | |
| 57 | + | ||
| 58 | + | ||
| 59 | + | ||
| 60 | + | [[Basic Pascal Tutorial/Chapter 3/CASE/ja|previous]] | [[Basic Pascal Tutorial/Contents/ja|contents]] | [[Basic Pascal Tutorial/Chapter 3/WHILE..DO/ja|next]] | |
| 61 | + | ---|---|--- | |
| 62 | + | ||
| 63 | + | --- | |
| 64 | + | *From the Free Pascal wiki, page "FOR..DO/ja", as the Internet Archive kept it on 2023-03-22. Copyright stays with the author who wrote it, according to the old wiki's [[Licensing]] page. If you have concerns about this material, [message the admin](/wiki-contact).* |
