
- •Структура программы на языке Pascal
- •Типы переменных
- •Типы переменных
- •Целый тип
- •Вещественный тип
- •Примеры использования стандартны функции вещественного типа
- •Символьный тип
- •Логический тип
- •Оператор присваивания
- •Процедуры ввода и вывода
- •Условный оператор в Pascal’е
- •Условный оператор
- •Условный оператор
- •Условный оператор
- •Условный оператор
- •Примеры работы программы на Pascal’e
- •Условный оператор
- •Примеры работы программы на Pascal’e
- •Условный оператор
- •Примеры работы программы на Pascal’e
- •Условный оператор
- •Примеры работы программы на Pascal’e
- •Оператор выбора
- •Оператор выбора
- •Оператор выбора
- •Примеры работы программы на Pascal’e
- •Циклы
- •Циклы
- •Виды циклов
- •Оператор цикла с
- •Вариант 2 (с уменьшением счётчика)
- •Оператор цикла с
- •Примеры работы программы на Pascal’e
- •While – Цикл с предусловием
- •While – Цикл с предусловием
- •Примеры работы программы на Pascal’e
- •While – Цикл с предусловием
- •Примеры работы программы на Pascal’e
- •Repeat – Цикл с постусловием
- •Repeat – Цикл с
- •Примеры работы программы на Pascal’e

Оператор цикла с
параметромЭтот опер тор используют, к гда количество повторений цикла известно заранее или необходимо изменять какую-либо величину в определённом диапазоне на одно и тоже
значение 1 или -1.
Вариант 1 (с увеличением счётчика)
FOR <счётчик> := <начальное значение> TO <конечное значение> DO
BEGIN |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||||
<оператор 1>; |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||
|
|
|
|
|
|
|
|
i:=1 |
|
|
|
|||||||
<оператор 2>; |
|
|
|
|
|
|
|
|
|
|
|
|||||||
<оператор n>; |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||
END; |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
i<=n |
|
|
|
|
|||||
|
|
|
|
|
|
|
|
|
|
|
|
|
||||||
Например: |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||||
|
|
|
|
|
|
|
|
|
|
|
|
|
||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
For i:= 1 to n do |
|
|
|
Инструкции |
|
|
|
|
|
|
|
|
||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||
|
|
|
|
|
|
|
|
|
|
Выход из цикла |
||||||||
BEGIN |
|
|
|
|
|
|
|
|
|
|
|
|
|
|||||
|
|
|
|
i=i+1 |
|
|
|
|||||||||||
|
|
|
|
|
|
|
|
|
|
|
||||||||
<оператор 1>; |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||||
<оператор 2>; |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||
<оператор n>; |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||
END; |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Назад

Вариант 2 (с уменьшением счётчика)
FOR <счётчик> := <начальное значение> DOWN TO <конечное значение> DO |
||
BEGIN |
|
|
<оператор 1>; |
|
|
<оператор 2>; |
|
|
<оператор n>; |
i:=n |
|
END; |
||
|
Например: |
|
|
For i:= n downto 1 |
do |
i>=1 |
BEGIN |
|
Инструкции |
<оператор 1>; |
|
|
<оператор 2>; |
|
Выход из цикла |
<оператор n>; |
|
i=i-1 |
END; |
|
Примечания: 1) здесь FOR (для), TO (до), DO (выполнить)
2)Служебное слово TO указывает направление изменения счётчика-увеличение на 1 (начальное значение конечного,если условие не выполняется, то оператор в теле цикла не выполняется).
3)Если между BEGIN и END находится только один оператор, то BEGIN и END можно не писать.
Назад

Оператор цикла с
параметром
Задача Напечатать на экране 10 раз слово “Весна”
Начало Ввод x
x:=1
x<=10
«Весна»
Выход
x=x+1
Назад

Примеры работы программы на Pascal’e
Назад

While – Цикл с предусловием
Проверяется значением выражения Условие, если оно выполняется, то выполняются инструкции, находящиеся между BEGIN и END (тело цикла). Затем снова проверяется значение выражения Условие, и так до тех пор, пока значение выражения Условие истинно. Если с самого начала Условие имеет значение ложь, оператор цикла не выполняется ни разу.
Форма записи |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||
While <условие> Do |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Условие |
|
|
|
|
||||
|
|
|
|
|
|
|
|
|
|
|
||||
|
|
|
|
|
|
|
|
|
|
|
||||
|
|
|
|
|
|
|
|
|
|
|
||||
Begin |
|
|
|
|
|
|
|
|
|
|
|
|||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Выход |
|||
< оператор>; |
|
|
|
|
|
|
|
|
|
|
||||
Оператор |
|
|
||||||||||||
End; |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Примечания: 1) Зарезервированные слова: WHILE (пока), DO (делать).
Назад

While – Цикл с предусловием
Задача №1 Найти произведение нечётных натуральных чисел на промежутке от 1 до 10.
Начало
P:=1
i:=1
|
i<=10 |
P:=p*i |
Вывод P |
|
|
i:=i+2 |
Конец |
|
Назад

Примеры работы программы на Pascal’e
Назад

While – Цикл с предусловием
Задача № 2. Даны целые числа a и b. Требуется вычислить наибольший делитель (НОД(a, b)).
Начало Ввод a, b
a=b a
Конец
a>b
|
b:=b-a |
|
|
a:=a-b |
|
||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Назад

Примеры работы программы на Pascal’e
Назад

Repeat – Цикл с постусловием
Форма записи |
|
|
|
|||||
… |
|
|
|
|||||
|
|
|
||||||
|
|
|
|
|
|
|||
REPEAT |
|
|
|
|
|
|
||
Оператор 1; |
||||||||
<оператор 1>; |
|
|
|
|
||||
|
|
|
|
|
|
|||
<оператор 2>; |
|
|
|
Оператор 2; |
||||
UNTIL <условие>; |
|
|
|
|
|
|
||
|
|
|
||||||
… |
|
|
|
Условие |
||||
|
|
|
|
|||||
|
|
|
|
|
Выход
Примечания: 1) Зарезервированные слова: REPEAT (повторять до тех пор), UNTIL (пока не будет выполнено)
2) Последовательность операторов может состоять из одного или нескольких любых операторов. Условие проверяется после выполнения операторов, если оно возможно - операторы снова выполняются, иначе – цикл прекращается. Тело цикла хотя бы один раз обязательно выполняется.
Назад