Ветвление в Pascal

Содержание

Слайд 2

Три типа алгоритмов Линейные С ветвлением С циклом

Три типа алгоритмов

Линейные
С ветвлением
С циклом

Слайд 3

Слайд 4

Ветвление представляет собой алгоритмическую конструкцию, в которой выполнение того или иного

Ветвление представляет собой алгоритмическую конструкцию, в которой выполнение того или иного

шага зависит от истинности условия.
На рисунке приведена блок-схема ветвления

Если условие ветвления
То действия 1 (если выполняется условие)
Иначе действия 2 (если условие не выполняется)
Всё

Алгоритмический язык

условие

действие 1

действие 2

да

нет

Слайд 5

Алгоритм «Забота о своем здоровье» Начало Если у тебя что-то болит

Алгоритм «Забота о своем здоровье»
Начало
Если у тебя что-то болит
То иди

к врачу
Всё
Конец
Алгоритм «Покупка билета на аттракцион»
Начало
Если тебе исполнилось 12 лет
То купи взрослый билет
Иначе купи детский билет
Всё
Конец

Алгоритм с неполной командой ветвления

Алгоритм с полной командой ветвления

условие

действие 1

действие 2

условие

действие 1

да

нет

да

нет

Слайд 6

If (если) then (тогда) else (иначе); Если То Иначе Всё Язык программирования Turbo Pascal Алгоритмический язык

If (если) then (тогда)
else (иначе);

Если
То
Иначе
Всё

Язык программирования Turbo

Pascal

Алгоритмический язык

Слайд 7

Задача. Найдите наибольшее из двух целых чисел. Дано: a, b-целые числа

Задача. Найдите наибольшее из двух целых чисел.

Дано: a, b-целые числа

Найти: d

– наибольшее число

Решение: если a > b , то d:= а, иначе d:= b.

Слайд 8

Пример программы на языке программирования Pascal {Программа, которая находит наибольшее из

Пример программы на языке программирования Pascal
{Программа, которая находит наибольшее из двух

целых чисел}
Program maximal; var a,b,d:integer; begin writeln ('введите целых два числа через пробел'); readln (a,b); if a>b then d:=a else d:=b; writeln ('наибольшее число', d);
readln end.

начало

a, b

a>b

да

нет

d:=a

d:=b

d

конец

Слайд 9

Полное ветвление if условие then begin операторы end else begin операторы

Полное ветвление

if условие
then
begin
операторы
end
else
begin
операторы

end;

Оператор 1
Оператор 2…

Оператор 1
Оператор 2…

Слайд 10

Неполное ветвление if условие then begin операторы end; условие да нет Оператор 1 Оператор 2…

Неполное ветвление

if условие
then
begin
операторы
end;

условие

да

нет

Оператор 1
Оператор 2…

Слайд 11

Один оператор if может входить в состав другого оператора if: Вариант

Один оператор if может входить в состав другого оператора if:

Вариант 1:
if

условие1 then
if условие2 then оператор1
else оператор2
else оператор3
Вариант 2:
if условие1 then оператор1
else if условие2 then оператор2
else оператор3
Вариант 3:
if условие1 then
if условие2 then оператор2
else оператор3
Слайд 12

!!! При вложенности операторов каждое else соответствует тому then, которое ему

!!!

При вложенности операторов каждое else соответствует тому then, которое ему предшествует.
Конструкций

со степенью вложенности больше 3 необходимо избегать.
Если операторов больше чем один следует использовать связку begin…end
В условных операторах точка с запятой НЕ ставится после then и перед else
Если условий несколько используются связки AND, OR (в этом случае каждое условие заключается в скобки)
Слайд 13

Например: ...If (a writeln (‘a+b - отрицательное’)…

Например:
...If (a<0) and (b<0) then
writeln (‘a+b - отрицательное’)…

Слайд 14

Домашнее задание Читать конспект Написать программу на языке программирования Pascal для

Домашнее задание

Читать конспект
Написать программу на языке программирования Pascal для задачи (+

блок-схема): вводятся года рождения Оли, Тани и Кати. Вывести на экран кто старше всех.