Ковальчук О.М. 20071 КОМАНДИ РОЗГАЛУЖЕННЯ (Turbo Pascal 7.0) КОМАНДИ РОЗГАЛУЖЕННЯ (Turbo Pascal 7.0) Інформатика-11 Тема-4 Ковальчук О.М., 2007. - презентация

1

2 Ковальчук О.М КОМАНДИ РОЗГАЛУЖЕННЯ (Turbo Pascal 7.0) КОМАНДИ РОЗГАЛУЖЕННЯ (Turbo Pascal 7.0) Інформатика-11 Тема-4 Ковальчук О.М., 2007

3 2 Розгалуження Розгалуження Часто буває потрібно реалізувати алгоритми, де потрібно в залежності від виконання умови виконувати або одні дії, або зовсім інші дії. У такому разі застосовують команди розгалуження. Розрізняють два типи розгалужень: Розгалуження на дві групи команд. Коли буде виконуватись або одна, або друга група команд в залежності від значення умови. (Розгалуження IF…) Розгалуження на багато груп команд. Коли умов вибору багато і варіантів команд багато. (Вибір Case…). Ковальчук О.М., 2007

4 Логічні вирази (умови): Бройченко А.Г Ковальчук О.М., 2007 Логічні вирази – це вирази, внаслідок обчислення яких одержуються логічні значення типу true або false (так або ні) Логічні вирази поділяються на прості та складені. Прості записуються за допомогою знаків співвідношень: >, <, <=, >=, = та <=> Складені логічні вирази утворюють з простих виразів, обєднаних логічними операціями and, or, not Приклади простих логічних виразів: A+B>C+DN<>Mx=yA>2 Наприклад, у математиці відомі такі записи: х Є [a,b] та х Є [a,b] У вигляді логічних виразів, це виглядатиме так: (x>=a) and (x<=b) not ((x>=a) and (x<=b))

5 Схема алгоритму повного оператора умовного переходу: Бройченко А.Г Логічний вираз Оператор 1Оператор 2 Ковальчук О.М., 2007 truefalse

6 Бройченко А.Г Команда розгалуження Команда розгалуження Загальний вид команди розгалуження: IF умова THEN команда-1 ELSE команда-2 Якщо умова справедлива, то ПК виконує команду- 1, в іншому випадку – команду-2. Коли потрібно виконувати не одну команду, а групу команд, то використовують такий варіант команди розгалуження: IF умова THEN BEGIN серія команд-1 END ELSE BEGIN серія команд-2 END; Ковальчук О.М., 2007

7 Ковальчук О.М Команда розгалуження Команда розгалуження Часто використовують скорочений варіант команди розгалуження: IF умова THEN команда; Якщо умова справедлива, то команда виконується, якщо ні – то ПК переходить до наступної команди. Ковальчук О.М., 2007 Умова

8 Бройченко А.Г Приклад використання команди розгалуження ЗАДАЧА. Людина вводить число. Якщо воно додатнє, то ПК розрахує корінь числа, якщо ж відємне – піднесе до квадрату. Ковальчук О.М., 2007

9 8 Програма Програма Program matem-1; Var a:integer; Y:real; Begin write(Введіть будь-яке число) людина вводить своє число. Readln(a); If a>0 then y:=Sqrt(a) else y:=a*a; ----вибір дії компютером. Writeln(y:3:1); -----виведення результату. readln; End. Ковальчук О.М., 2007

10 Ковальчук О.М Команда вибору Команда вибору Коли багато різних варіантів значень величини та відповідно дій, треба використовувати команду вибору: CASE величина DO значення 1 : команда 1; значення 2 : команда 2; …….. Значення n : команда n; ELSE команда; END; Величина – це параметр за значенням якого і виконується та чи інша команда. Ковальчук О.М., 2007

11 Ковальчук О.М Команда вибору Команда вибору Команда вибору цікава тим, що можуть виконатися декілька команд, якщо величина приймає значення, що зустрічаються декілька разів. Якщо жодне із значень величини не виконується, то ПК виконує команди, що містяться після ELSE. Тип величини, по якій ведеться вибір, повинно бути тільки Integer. Якщо ми хочемо вказати діапазон значень величини, то вказуємо його через дві крапки (наприклад: або ). Ковальчук О.М., 2007

12 11 Задача визначення категорії оцінювання за введеним числом Користувач вводить цифру, а ПК визначає до якої категорії оцінювання відноситься така оцінка. Якщо від 1 до 3 – погано, від 4 до 6 – посередньо, від 7 до 9 – добре, від 10 до 12 – відмінно. Врахувати введення чисел, що не являються оцінкою. Ковальчук О.М., 2007

13 12 Програма Program OCINKA; Var a:integer; (величина для вибору цілого типу) Begin Writeln(Введіть Вашу оцінку); Readln(a); (величина-оцінка, по якій буде вибір дій) Case a of 1..3 : Writeln(Погано); 4..6 : Writeln(Посередньо); Вибір варіанту 7..9 : Writeln(Добре); : Writeln(Відмінно); Else Writeln(Такої оцінки немає); ----(якщо ні одне значення End; не підійшло) Readln; End. Ковальчук О.М., 2007