Transcript Вказівка розгалуження у мові Pascal
Давайте
ПРИГАДАЄМО:
1.
2.
Які базові алгоритмічні структури є у мові Pascal?
Які із даних структур ми вже розглядали?
3.
4.
Наведіть приклади лінійних програм.
Наведіть приклади алгоритмів із розгалуженням.
5.
Як зробити висновок про те, що дана задача реалізовується з допомогою розгалуження?
Розгалуження
мовою НАМ
Скорочена форма: Якщо
умова
То Все
команда 1
Блок-схема
розгалуження
умова Команда 1
Розгалуження
мовою НАМ
Повна форма: Якщо
умова
То
команда 1
Інакше
команда 2
Все
Блок-схема
розгалуження
ні
Команда 2 умова
так
Команда 1
Тема заняття: Вказівка розгалуження у мові Pascal
План.
1.
Опис вказівки розгалуження мовою Pascal.
2.
3.
Проста і складна умови у вказівці розгалуження.
4.
5.
даної вказівки
з використанням вказівки розгалуження.
Реалізація програм з розгалуженням у середовищі програмування.
Мета:
навчитись записувати вказівку розгалуження мовою Pascal; розуміти як виконується ця вказівка; навчитись складати програми з використанням вказівки розгалуження; навчитись реалізовувати дані програми у середовищі програмування Pascal.
Вказівка
розгалуження
мовою Pascal
Скорочена форма
If
< умова>
Then
< вказівка 1>; Виконується ця вказівка таким чином
:
1.
2.
Якщо
умова істинна
, то виконується
вказівка 1
, а потім вказівка, яка знаходиться в програмі
після всієї вказівки розгалуження
; Якщо
умова хибна
, то виконується вказівка, яка знаходиться
після вказівки розгалуження
.
Вказівка
розгалуження
мовою Pascal
Повна форма
If
< умова>
Then Else
< вказівка 1> < вказівка 2>; Виконується ця вказівка таким чином
:
1.
2.
Якщо
умова істинна
, то виконується
вказівка 1
, а потім вказівка, яка знаходиться в програмі
після всієї вказівки розгалуження
; Якщо
умова хибна
, то виконується
вказівка2
, а потім вказівка, яка знаходиться
після всієї вказівки розгалуження
.
1)a< 5 2) c>= 100 3) в=0, 4) a< b і т.д.
Умова
– це вираз булевого типу.
ВИДИ УМОВ
ПРОСТА СКЛАДНА 1) (a>5) and (a< 10) 2) (b=2) or (b=3) 3) (m>=10) and (m< = 16) 4) not((a=10) and (a=20)) і т.д.
Навести власні приклади простої і складної умови!
Конкретні
приклади вказівки розгалуження 1). Вивести температуру кипіння води.
If T>=100 Then
writeln (‘ВОДА КИПИТЬ’)
Else
writeln (‘ВОДА НЕ КИПИТЬ’);
2). Знайти квадратний корінь із числа If А>=0 Then
A1:=SQRT(A)
Else
writeln (‘КОРІНЬ КВАДРАТНИЙ НЕ ІСНУЄ);
Розв’язування вправ
1.
Які з наведених нижче вказівок розгалуження є правильними: а) if a< b then a: = a+1 else b: = b-1; б) if (x<5) and (y>3); then s: = s+1; else s: = s-1; в) г) if if a< b 9 then then b: = a; k: = k+1 ; 2. Які значення будуть мати змінні A i B в результаті виконання вказівки розгалуження: if A< B then A: =B else B: = A; якщо перед її виконанням A=0.5, B=-1.7
A= -3.4, B= 0 A= 10, B= 10.2
Розв’язування вправ
3. При яких значеннях a i b , умова буде: 1)
істинна
____________ 2)
хибна
____________ а) a=2, b=5; б) a=5, b=2; в) a=2, b=2 4. Яка задача розв’язується в результаті виконання вказівки:
if
x< y
then
max: = y
else
max: = x;
Складання програм та їх реалізація у середовищі Pascal Задача 1.
Написати програму, яка би виводила більше серед двох заданих чисел.
Program Umova; Var A, B: integer; Begin Write (‘A=’); Readln (A); Write (‘B=’); Readln (B);
If
A- B>= 0
then Else
writeln (‘A більше B’) writeln (‘B більше A’); End.
Вказівка розгалуження може записуватися з використанням
складеної вказівки таким чином:
If
< умова>
Then
begin <вказівка 1>; <вказівка 1>; end
Else
begin < вказівка 3>; < вказівка 4>; end;
Складання програм та їх реалізація у середовищі Pascal Задача 2.
складену.
Написати програму, яка би в залежності від умови виводила різне значення, при цьому використати вказівку розгалуження A>B, R:= A-B; A Складання програм та їх реалізація у середовищі Pascal Задача 3. Написати програму для знаходження квадратного кореня із даного числа.