Delphi/Цикл: различия между версиями

Содержимое удалено Содержимое добавлено
м Откат правок 217.76.76.42 (обс.) к версии Brateevsky
{{BookCat}} и викификация
Строка 1:
'''Цикл''' — это многоповторяющееся участок кода программы. Циклы бывают разные.
 
== Цикл "«Делай пока верно условие"» ==
Общий вид цикла этого типа:
<source lang="delphi">
Строка 8 ⟶ 9 :
end;
</source>
Программа "«вертится"» по кругу. Но бесконечно цикл идти не может, если условие будет неверное, цикл остановится. Давайте напишем программу с циклом.
<source lang="delphi">
procedure TForm1.Button1Click(Sender: TObject);
Строка 21 ⟶ 22 :
end;
</source>
Почему Label показывает нам сразу сотню? Дело в том, что цикл идет на столько быстро, что наш глаз не успевает заметить как меняются числа: 1..10..20...20…
Чтобы увидеть как меняются числа нужно приписать следующие команды:
<source lang="delphi">
Строка 30 ⟶ 31 :
sleep(<число миллисекунд>);
</source>
Первая позволяет выводить значения переменных во время цикла. Вторая приказывает программе "«поспать"» на какое-то количество миллисекунд.
Код программы с новыми командами:
<source lang="delphi">
Строка 46 ⟶ 47 :
end;
</source>
==Цикл с счётчиком==
 
== Цикл с счётчиком ==
 
{{BookCat}}
[[Категория:Delphi]]