End/ru: what changed

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

Old	New		Line
1		-	\
2	1		End является [[Keyword/ru\|ключевым словом]], предназначенным для:
3	2
4	3		- завершения [[Block/ru\|блока]] инструкций, начинающихся зарезервированными словами [[Begin/ru\|Begin]] или [[Case/ru\|Case]];
5	4		- завершения объявлений [[Field/ru\|полей]] в [[Record/ru\|записях]];
6	5		- завершения конструкций [[Try/ru\|Try]] .. [[Finally/ru\|Finally]] или [[Try/ru\|Try]] .. [[Except/ru\|Except]].
7	6
8	7		Оно также используется для завершения [[Unit/ru\|модуля]], не имеющего кода в разделе initialization.
9	8
10	9		Например:
11	10
12	11		``` pascal
13	12		procedure Proc1;
14	13
15	14		var a,b: integer;
16	15
17	16		begin
18	17		(..)
19	18		end;
20	19		```
21	20
22	21		Оператор end является одним из исключений из правил, согласно которому каждый оператор должен оканчиваться точкой с запятой. Для оператора, предшествующего оператору end, не требуется ставить точку с запятой.
23	22
24	23		Оператор end также используется для указания конца файла с исходным кодом на языке [[Pascal]]. В этом случае за ним ставится [[Period/ru\|точка]], а не [[;/ru\|точка с запятой]] (в приведенном ниже примере последняя точка с запятой является не обязательной):
25	24
26	25		``` pascal
27	26
28	27		program Proc2;
29	28		var
30	29		SL: TStrings;
31	30		begin
32	31		SL := TStringlist.Create;
33	32		try
34	33		(..)
35	34		finally
36	35		SL.Free;
37	36		end;
38	37		end.
39	38		```
40	39
41	40		Оператор end используется для указания конца модуля:
42	41
43	42		``` pascal
44	43		unit detent;
45	44		uses math;
46	45
47	46		procedure delta(r:real);
48	47
49	48		implementation
50	49
51	50		procedure delta;
52	51		begin
53	52
54	53		...
55	54
56	55		end;
57	56
58	57		...
59	58		(* Примечание: Нет соответствующего оператора '''begin''' *)
60	59
61	60		end.
62	61		```
63	62
64	63		Также оператор end предназначен для завершения описания [[Record/ru\|записей]]:
65	64
66	65		``` pascal
67	66		Type
68	67		ExampleRecord = Record
69	68		Values: array [1..200] of real;
70	69		NumValues: Integer; { holds the actual number of points in the array }
71	70		Average: Real { holds the average or mean of the values in the array }
72	71		End;
73	72		```
74	73
75	74		---
76	75		From the Free Pascal wiki, page "End/ru", as it stood on 2020-02-14 after a change by Trev, out of the wiki's dump of 2024-05-26. 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