Разветвляющиеся алгоритмы на языке Паскаль презентация

Разветвляющийся алгоритм – алгоритм, в котором в зависимости от выполнения или не выполнения некоторого условия совершается либо одна, либо другая последовательность действий.

Формы ветвления
Полная
Неполная

ПОЛНАЯ ФОРМА ВЕТВЛЕНИЯ
НА АЛГОРИТМИЧЕСКОМ
ЯЗЫКЕ
если
условие
то
серия команд 1
иначе
серия команд 2
конец ветвления

НЕПОЛНАЯ ФОРМА ВЕТВЛЕНИЯ
НА АЛГОРИТМИЧЕСКОМ
ЯЗЫКЕ
если
условие
то
серия команд 1
конец ветвления

да
выход
Блок-схема
условие
вход
нет
да
условие
вход
нет
выход
полного ветвления
неполного ветвления

Пример:
Как проверить арбуз на спелость?
начало
бросить арбуз в воду
арбуз
всплыл?
он спелый
он не спелый
достать арбуз из воды
конец
да
нет

Пример:
осенью, идя в школу, как вы
определите брать вам с собой зонт или нет?
начало
подойдем к окну
посмотрим в окно
идет
дождь?
взять зонт
идти в школу
конец
да
нет

Задача 1:
в блок – схеме алгоритма
вычисления значения функции
заполните пустые блоки.
Ввод
x
X-1<0
y=3
y=4
Вывод
y
конец
да
нет
начало

Ввод
x
X-1<0
y=3
y=4
Вывод
y
конец
да
нет
начало
1
2
3
4
X=-5

Ввод
x
X-1<0
y=3
y=4
Вывод
y
конец
да
нет
начало
1
2
3
4
X=5
Ввод x
X-1<0
Y=3
5
5-1<0,
3
Вывод
y
нет

ПОЛНАЯ ФОРМА ВЕТВЛЕНИЯ
НА АЛГОРИТМИЧЕСКОМ НА ЯЗЫКЕ ПАСКАЛЬ
ЯЗЫКЕ
если условие
то серия команд 1
иначе серия команд 2
конец ветвления

ПОЛНАЯ ФОРМА ВЕТВЛЕНИЯ
НА АЛГОРИТМИЧЕСКОМ НА ЯЗЫКЕ ПАСКАЛЬ
ЯЗЫКЕ
Если условие IF <условие>
то серия команд 1 then <серия команд 1>
иначе серия команд 2 else <серия команд 2>;
конец ветвления

НЕПОЛНАЯ ФОРМА ВЕТВЛЕНИЯ
НА АЛГОРИТМИЧЕСКОМ НА ЯЗЫКЕ ПАСКАЛЬ
ЯЗЫКЕ
если условие
то серия команд 1
конец ветвления

НЕПОЛНАЯ ФОРМА ВЕТВЛЕНИЯ
НА АЛГОРИТМИЧЕСКОМ НА ЯЗЫКЕ ПАСКАЛЬ
ЯЗЫКЕ
Если условие IF <условие>
то серия команд 1 then <серия команд 1>;
конец ветвления

Операции отношения:
< - меньше
> - больше
<= - меньше или равно
>= - больше или равно
<> - не равно
= - равно

начало
Ввод
x
X-1<0
y=3
y=4
Вывод
y
конец
да
нет
Задание: по известной блок-схеме cоставить программу на языке Паскаль
Program z1;
Var
Y:
X:
Integer;
Real;
Write( );
Begin
vvedi x=
’ ’
Read ( );
x
If
x-1<0
then
y:=4
else
y:=3;
Write ( );
y=
’ ’
,
y
Readln;
End.