Примеры условных операторов

Пример1

If x<y then

Max:=y

Else

Max:=x

Пример2

Вычислить значение функции Y, в зависимости от значения x.

Условный оператор будет иметь вид:

If x>0 Then Y:=a*x+b Else Y:=a*x*x+b;

Листинг программы

Тема 2.2.3. Циклические конструкции.

Понятие цикла. Оператор цикла с параметром: структура, блок-схема, пример. Оператор цикла с предусловием: структура, блок-схема, пример. Оператор цикла с постусловием: структура, блок-схема, пример.

После изучения темы студент должен

знать:

- Понятия цикла и классификацию операторов цикла;

- Оператор цикла с параметром, структуру, принцип выполнения;

- Оператор цикла с предусловием, структуру, принцип выполнения;

- Оператор цикла с постусловием, структуру, принцип выполнения;

Уметь

- Составлять программы с использованием операторов цикла.

Командой повторения или циклом называется такая форма организации действий, при которой одна и та же последовательность действий повторяется до тех пор, пока сохраняется значение некоторого логического выражения. При изменении значения логического выражения на противоположное повторения прекращаются (цикл завершается).

Для организации цикла необходимо выполнить следующие действия:

· перед началом цикла задать начальное значение параметра;

· внутри цикла изменять параметр цикла с помощью оператора присваивания;

· проверять условие повторения или окончания цикла;

· управлять циклом, т.е. переходить к его началу, если он не закончен, или выходить из цикла в противном случае.

В языке Паскаль имеются три различных оператора, с помощью которых можно запрограммировать повторяющиеся фрагменты алгоритмов.

Оператор цикла с параметром имеет такую структуру:

For <имя переменной> := <выражение1> To <выражение2> Do <оператор> ;

<имя переменной> - параметр цикла
<выражение1> - начальное значение параметра цикла
<выражение2> - конечное значение параметра цикла
Все три указанных выше объекта должны быть одного порядкового типа.
<оператор> - тело цикла.

Этот оператор цикла выполняется следующим образом:

1. Вычисляются значения выражения 1 и выражения 2.
2. Параметру цикла присваивается начальное значение.
3. Параметр цикла сравнивается с конечным значением. Если параметр цикла меньше или равен конечному значению, то перейти к п.4, иначе - конец цикла (переход на следующий оператор после оператора цикла).
4. Выполнить тело цикла. Параметр цикла принимает следующее значение, полученное с помощью функции Succ. Перейти к п.3.
Есть еще один вариант этого оператора цикла, когда параметр цикла после каждого выполнения тела цикла принимает следующее значение, полученное с помощью функции Pred. В этом случае служебное слово To заменяется на Dowto и цикл идет до тех пор, пока параметр цикла не станет строго меньше конечного значения.

Пример.
Вычислить и напечатать первые 10 чисел Фибоначчи.
Решение:

Program Fib;
Сonst n=10; {количество чисел}
Var i,f1,f2,f3:Integer;
Begin
f1 := 1; f2 := 1; {первые два числа Фибоначчи}
For i := 3 To n Do
Begin
f3 := f1 + f2; {следующее число}
Writeln(f3);
f1 := f2; f2 := f3
End
End.