Как продвинуть сайт на первые места?
Вы создали или только планируете создать свой сайт, но не знаете, как продвигать? Продвижение сайта – это не просто процесс, а целый комплекс мероприятий, направленных на увеличение его посещаемости и повышение его позиций в поисковых системах.

Ускорение продвижения
Если вам трудно попасть на первые места в поиске самостоятельно, попробуйте технологию Буст, она ускоряет продвижение в десятки раз, а первые результаты появляются уже в течение первых 7 дней. Если ни один запрос у вас не продвинется в Топ10 за месяц, то в SeoHammer за бустер вернут деньги.



Иллюстрированный самоучитель по Delphi 7 для начинающих

Циклы. Инструкции for, repeat, while.

Инструкция for

Вариант 1 (с увеличением счетчика):

for Счетчик: = НачальноеЗначение to КонечноеЗначение do begin

{ здесь инструкции } end;

Инструкции между begin и end выполняется (КонечноеЗначение – НачальноеЗначение) + 1 раз.

ЕСЛИ НачальноеЗначение > КонечноеЗначение, ТО инструкции между begin и

end не выполняются.

Примечание
Если между begin и end находится только одна инструкция, то слова begin и end можно не писать
.

Вариант 2 (с уменьшением счетчика):

for Счетчик: = НачальноеЗначение downto КонечноеЗначение do begin

{ здесь инструкции } end;

Инструкции между begin и end выполняется (НачальноеЗначение – КонечноеЗначение) + 1 раз.

Если НачальноеЗначение < КонечноеЗначение, то инструкции между begin и end не выполняются.

Примечание
Если между begin и end находится только одна инструкция, то слова begin и end можно не писать
.

Инструкция repeat

repeat

{ инструкции } until Условие;

Сначала выполняются инструкции цикла, которые расположены между repeat и until. Затем вычисляется значение выражения Условие, и если оно равно False, то инструкции цикла выполняются еще раз. И так до тех пор, пока значение выражения Условие не станет равным True.

Инструкция while

while Условие do begin

{ инструкции) end;

Сначала проверяется Условие, если оно истинно, то выполняются инструкции между begin и end. Затем снова проверяется Условие. Если оно выполняется, то инструкции цикла выполняются еще раз. И так до тех пор, пока Условие не станет ложным.

Примечание
Если между begin и end находится только одна инструкция, то слова begin и end можно не писать
.

Если Вы заметили ошибку, выделите, пожалуйста, необходимый текст и нажмите CTRL + Enter, чтобы сообщить об этом редактору.