Basic Pascal Tutorial/Chapter 3/FOR..DO/ja: what changed

Revision 1 to 2. Removed lines have a minus sign; added lines have a plus sign.

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

Back to history