Мультиплікативні операції [3], що виконуються над даними цілого типу: *, /, div, mod. При виконанні операції / отримуємо результат дійсного типу, всі інші операції дають результат цілого типу. Нехай N - ціле число. Операція N mod 10 дозволяє знайти залишок від ділення на 10, і цей результат є значенням одиниць числа N. Операція N div 10 знижує розрядність числа, відкидаючи позицію одиниць. Таким чином, використовуючи послідовно ці операції, можна отримати всі цифри цілого числа.
Приклад. Ввести ціле тризначне число. Знайти суму всіх цифр його цифр.
Program N3;
Var n, s, a, b: integer;
Begin
Writeln (' Введіть тризначне число ');
Readln (n);
Write (' Сума цифр числа ', n);
a: = n mod 10; {одиниці}
n: = n div 10;
b: = n mod 10; {десятки}
n: = n div 10; {сотні}
s: = a + b + n;
Writeln (' дорівнює ', s);
End.
Змінні логічного типу даних (Boolean) можуть приймати тільки 2 значення-True (істина) і False (хиба). Значення True і False є за своєю суттю ідентифікаторами констант.
Тип будь-якого висловлювання визначається, виходячи з того, дані яких типів в нього входять і які операції містить вираз. Логічний вираз - це такий вираз, який може приймати значення true або false. Логічний результат можна отримати, якщо виконати одну з операцій відносин (порівняння).
Перелік операцій відносин наведений в таблиці 2.1.
Таблиця 2.1 - Операції відносин
| Операція
| Дія
|
| =
| Дорівнює
|
| <>
| Не дорівнює
|
| <
| Менше
|
| >
| Більше
|
| <=
| Менше або дорівнює
|
| >=
| Більше або дорівнює
|
За допомогою цих операцій можна порівнювати не тільки числові, а й символьні та логічні дані.
Логічні вирази можуть об'єднуватися в один вираз за допомогою логічних операцій not (заперечення), and («і»), or («або»). Такі вирази називаються складними. У таблиці 2.2 наведені приклади виконання логічних операцій.
Таблиця 2.2 - Логічні операції
Пріоритет виконання логічних операцій такий:
1) not
2) and
3) or
Приклад. Наступні змінні мають значення: х = 3, у = - 9. У таблиці 2.3 наведені деякі логічні вирази та їх значення.
Таблиця 2.3 - Приклади логічних виразів
| Прості вирази
| Значення
| Складні вирази
| Значення
|
| х = 3
| true
| not (y<=-50)
| true
|
| х > y
| true
| (x>1) and(x<5)
| true
|
| 7 mod 3=1
| true
| (x>4) or (y<-15)
| false
|
| y div 2=4
| false
| (x>4) or (y>-15)
| true
|
Подвійна нерівність 1 <х <5 є складним логічним виразом. Його записують так:
(1 <x) and (x <5).
Сукупність нерівностей виду x <1; x> 5 можна записати так: (x <1) or (x> 5).
Прості логічні вирази, з яких складаються складні, завжди беруть у круглі дужки.
Значення логічного виразу можна вивести оператором Writeln. Наприклад, дані 3 цілих числа а, b, c. Вивести значення true або false в залежності від того, істинний або хибний вказаний вислів:
1. Хоча б одне з чисел a, b, c парне.
Wtiteln ((a mod 2 = 0) or (b mod 2 = 0) or (c mod 2 = 0))
2. Всі числа a, b, c більше 10.
Wtiteln ((a> 10) and (b> 10) and (c> 10))
2.3 Завдання до лабораторної роботи:
Ввести ціле чотиризначне число. Вивести значення true або false в залежності від того, істинний або хибний вказаний вислів:
1. Сума перших двох цифр більше суми двох останніх цифр.
2. Число симетрично відносно центру, тобто перша цифра дорівнює останній, а друга дорівнює передостанній.
3. Серед цифр нема жодного нуля.
4. Парність першої та останньої цифр однакова.
5. Добуток середніх цифр більше добутку першої та останньої цифр.
6. Число, отримане з цифр, що записані у зворотному порядку, більше вихідного числа.
7. Добуток всіх цифр числа більше, ніж сума цифр.
8. Отримати 2 нових числа - з двох перших цифр і з двох останніх. Чи правда, що перше число більше другого
9. Сума цифр числа ділиться на 3, але не ділиться на 5.
10. Кожна наступна цифра більша від попередньої.
11. Всі цифри числа різні.
12. Серед цифр є тільки одна парна.
13. Усі цифри числа мають значення в діапазоні від 3 до 7.
14. Всі цифри мають однакову парність.
15. Серед цифр є хоча б одна цифра 4.
16. Серед цифр нема жодної, меншої ніж 5.
17. Кількість парних та непарних цифр однакова.
18. Сума середніх цифр менше суми першої та останньої цифр.
19. Кожна наступна цифра менша від попередньої.
20. Серед цифр є тільки дві однакові.
21. Тільки одна цифра числа має значення більше, ніж 6.
22. Сума цифр числа парна.
23. Серед цифр немає двох однакових.
24. Всі цифри числа більші ніж 6.
25. Кожна наступна цифра не менша від попередньої
Контрольні питання
1. Перерахуйте всі операції для цілого типу даних у порядку зменшення пріоритету.
2. Перерахуйте всі операції для логічного типу даних у порядку зменшення пріоритету.
3. Які логічні вирази називаються складними?
4. Назвіть всі операції відношення. Який тип результату цих операцій?
5. За допомогою якої стандартної функції можна визначити парність числа?
6. Як визначити тип виразу?
7. Як визначити значення розряду десятків цілого числа?
8. Чому дорівнює значення такого виразу: 758 div 10 div 10 div 10?
9. Чому прості логічні вирази, з яких складаються складні, беруть у круглі дужки.?
3 ПРОГРАМУВАННЯ ЦИКЛІВ ТА РОЗГАЛУЖЕНЬ
Мета роботи - отримання навичок у використанні умовного оператора в програмі. Освоєння організації циклів. Знайомство з завданнями табулювання функції.
