Циклы в Pascal.

Циклы в Паскаль представляют собой многократно - повторяющиеся действия. В этой статье мы рассмотрим операторы  цикла For To и For Downto. Эти операторы используются в том случае, если нам необходимо, чтобы какое-то действие повторилось несколько раз. 

Создадим программу, которая будет выводить на экран квадраты чисел от 1 до 10.

Использование цикла For..to.

program ciklih1;
uses crt;
var N:integer;
begin
clrscr;
For N:=1 To 10 Do
writeln (sqr(N));
readln
end.

Строка №3. Записываем переменну «N». Она будет использоваться в качестве счетчика цикла. Практически во всех программах, использующих цикл For применяется счетчик цикла

В строке №6 записываем цикл For..To..Do. Счетчик цикла «N» показывает сколько раз должен быть выполнен цикл. В нашем примере счетчик будет принимать 10 различных значений от 1 до 10. Соответственно, цикл будет выполнен 10 раз. После слова Do записываются операторы, которые должны выполниться 10 раз при разных значениях счетчика. В нашем примере за словом Do идет оператор вывода на экран Writeln, который выводит на экран квадрат переменной «N» (т.е. счетчика цикла).

В строке №7 выводим квадрат переменной «N» на экран. Благодаря циклу For квадрат переменной  будет выведен 10 раз. Сначала для числа 1, затем для 2, затем для 3 и т.д. до 10.

В примере переменная «N» является счетчиком цикла. В операторе For указывается начальное значение счетчика «1» и конечное значение «10». Причем не обязательно, чтобы начально значение было равно 1. Можно поставить 2 или 3 или 4 и т.д. Соответственно, квадраты чисел будут выводиться, начиная с 2, 3 или 4. Следует также скажать, что счетчик цикла может увеличиваться только на 1.

Форма записи For N:=1 To 10 Do увеличивает счетчик на еденицу. Если вместо To записать DownTo, то это будет форма записи, которая уменьшает счетчик на еденицу.
Напишем программу, которая будет выводить на экран кубы чисел от 10 до 5

Использование For..To..Downto.

program ciklih2;
uses crt;
var N: integer;
begin
clrscr;
For N:=10 Downto 5 Do
writeln (N*N*N);
readln
end.

В строке №6 записываем цикл For. Однако, в отличии от предыдущего примера, здесь вместо «To» употребляется «Downto». Поэтому действие, которое стоит после слова Do (строка №7) будет выполнено 5 раз в порядке уменьшения переменной «N». Т.е. сначала выведется 10 в кубе, затем 9 в кубе, затем 8 в кубе и т.д. до 5 в кубе.

Предыдущая статья : Оператор выбора Case Of в Pascal.

Оглавление : Уроки Паскаль. Циклы.

Следующая статья : Оператор цикла While..Do.