Презентація на тему:
Вказівка розгалуження у мові Pascal

Які базові алгоритмічні структури є у мові Pascal? Які із даних структур ми вже розглядали? Наведіть приклади лінійних програм. Наведіть приклади алгоритмів із розгалуженням. Як зробити висновок про те, що дана задача реалізовується з допомогою розгалуження? Давайте ПРИГАДАЄМО:

Розгалуження мовою НАМ Блок-схема розгалуження Скорочена форма: Якщо умова То команда 1 Все

Розгалуження мовою НАМ Блок-схема розгалуження Повна форма: Якщо умова То команда 1 Інакше команда 2 Все

Тема заняття: Вказівка розгалуження у мові Pascal

План. 1. Опис вказівки розгалуження мовою Pascal. 2. Проста і складна умови у вказівці розгалуження. 3. Розв’язування вправ на використання даної вказівки 4. Складання програм з використанням вказівки розгалуження. 5. Реалізація програм з розгалуженням у середовищі програмування.

Мета: навчитись записувати вказівку розгалуження мовою Pascal; розуміти як виконується ця вказівка; навчитись складати програми з використанням вказівки розгалуження; навчитись реалізовувати дані програми у середовищі програмування Pascal.

Вказівка розгалуження мовою Pascal Виконується ця вказівка таким чином: Якщо умова істинна, то виконується вказівка 1, а потім вказівка, яка знаходиться в програмі після всієї вказівки розгалуження; 2. Якщо умова хибна, то виконується вказівка, яка знаходиться після вказівки розгалуження. Скорочена форма If Then ;

Вказівка розгалуження мовою Pascal Виконується ця вказівка таким чином: Якщо умова істинна, то виконується вказівка 1, а потім вказівка, яка знаходиться в програмі після всієї вказівки розгалуження; 2. Якщо умова хибна, то виконується вказівка2, а потім вказівка, яка знаходиться після всієї вказівки розгалуження. Повна форма If Then Else ;

Умова – це вираз булевого типу. ВИДИ УМОВ ПРОСТА СКЛАДНА 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 (‘КОРІНЬ КВАДРАТНИЙ НЕ ІСНУЄ);

Розв’язування вправ Які з наведених нижче вказівок розгалуження є правильними: а) if a< b then a: = a+1 else b: = b-1; б) if (x3); then s: = s+1; else s: = s-1; в) if a< b then b: = a; г) if 9 then 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 writeln (‘A більше B’) Else writeln (‘B більше A’); End.

Вказівка розгалуження може записуватися з використанням складеної вказівки таким чином: If Then begin ; ; end Else begin ; ; end;

Складання програм та їх реалізація у середовищі Pascal Задача 2. Написати програму, яка би в залежності від умови виводила різне значення, при цьому використати вказівку розгалуження складену. A>B, R:= A-B; A

Складання програм та їх реалізація у середовищі Pascal Задача 3. Написати програму для знаходження квадратного кореня із даного числа.