Basic Pascal Tutorial/Chapter 3/REPEAT..UNTIL/bg: what changed

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

Title: Basic Pascal Tutorial/Chapter 3/REPEAT..UNTIL/bg

New		Line
1	+	## REPEAT...UNTIL
2	+
3	+	Конструкцията repeat .. until се нарича цикъл с постусловие защото контролното условие се проверява на края на изпълнението на цикъла.
4	+
5	+	Има следния синтаксис:
6	+
7	+	``` pascal
8	+	repeat
9	+	statement1;
10	+	// statement2;
11	+	// further statements...
12	+	until BooleanExpression;
13	+	```
14	+
15	+	Цикълът `repeat-until` затваря операторите в тялото си, което означава, че няма нужда да се използва допълнителен блок <tt>begin ... end<tt>. Отбележете, че цикъла repeat продължава да се изпълнява докато условието му стане `True`; за разлика от цикъла `while-do`, който продължава докато условието му стане `False`.
16	+
17	+	Например, тялото на следния цикъл `repeat` ще се изпълни поне веднъж:
18	+
19	+	``` pascal
20	+	repeat
21	+	WriteLn(Node.Text);
22	+	Node := GetNextNode;
23	+	until not Assigned(Node);
24	+	```
25	+
26	+	Тук се предполага, че в самото начало променливата Node не е равна на Nil. Ако това на е така програмата ще се издъни.
27	+
28	+	Цикълът `while-do` е по-безопасен, понеже проверката се прави преди да се започне с изпълняване на операторите в тялото:
29	+
30	+	``` pascal
31	+	while Assigned(Node) do
32	+	begin
33	+	WriteLn(Node.Text);
34	+	Node := GetNextNode;
35	+	end;
36	+	```
37	+
38	+	Използвайте цикъл `repeat-until` когато операторите в тялото трябва да се изпълнят поне веднъж, независимо от началната стойност на контролното логическо условие.
39	+
40	+	Не е трудно по невнимание да се напише условие, контролиращо цикъл `repeat-until`, което никога не става True. Това поражда безкраен цикъл и кара програмата да увисне.
41	+
42	+	Един начин за програмиране е умишлено да се създаде безкраен цикъл и да се вмъкне оператор `Break` или `Exit`, контролиран от някакво условие по средата на цикъла, и по този начин да се излезе от иначе безкрайното повторение:
43	+
44	+	``` pascal
45	+	repeat
46	+	statement1;
47	+	if Condition then // Задължително трябва да стане True!
48	+	Break;
49	+	statement_that_might_affect_the_Condition;
50	+	until False;
51	+	```
52	+
53	+	Успешното използване на този подход зависи от условието, което в даден момент задължително трябва да стане вярно, без изключение. В противен случай сте вградили гарантирано безкраен цикъл.
54	+
55	+	---
56	+	From the Free Pascal wiki, page "Basic Pascal Tutorial/Chapter 3/REPEAT..UNTIL/bg", as it stood on 2022-08-20 after a change by Kai Burghardt, 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