
- •Практична робота №27
- •Теоретичні відомості
- •На множині цілих чисел визначені такі операції:
- •Математичні функції:
- •Дійсні типи
- •Запис числа з плаваючою крапкою
- •На множині дійсних чисел визначені такі операції:
- •Математичні функції:
- •Функції для роботи з літерним типом:
- •Булевий тип
- •Опис та використання вказівки розгалуження
- •Логічні операції над даними типу boolean
- •Вказівка варіанта (вибору)
- •Порядок виконання роботи і опрацювання результатів.
- •Завдання 1.
- •Збережіть складену програму у папці TurboPascal під назвою if1_Ваще прізвище_група.Pas Завдання 2.
- •Збережіть складену програму у папці TurboPascal під назвою if2_Ваще прізвище_група.Pas Завдання 4.
- •Збережіть складену програму у папці TurboPascal під назвою if3_Ваще прізвище_група.Pas Контрольні запитання
Булевий тип
ODD(X) TRUE, якщо Х — непарне число FALSE, якщо Х — парне число
Результат даної функції належить до булевого типу. Результат виконання операцій порівняння (=, <, >, >=, <=, <>) над даними одного типу належить до булевого типу.
Опис та використання вказівки розгалуження
Прості команди виконують окремі дії, не змінюючи порядку виконання алгоритму. До простих вказівок відносяться команди введення, виведення та присвоювання.
Складені команди можуть змінювати порядок виконання алгоритму. До складених команд належать команди розгалуження, вибору та повторення. Сьогодні ми розглянемо команду розгалуження.
Розгалуження - це форма організації дій, при якій у залежності від виконання або невиконання певної умови виконується одна з двох послідовностей команд, після чого розгалуження припиняється.
Умова – це будь-яке твердження або запитання, що допускає лише дві відповіді «так» або «ні».
Існує дві форми розгалуження - повна та коротка. Повна припускає вибір одного з двох можливих шляхів виконання алгоритму. Вибір того чи іншого шляху залежить від виконання певної умови.
1. Повна форма: if <умова> then <вказівка1> else <вказівка2>; |
2. Скорочена форма: if<умова > then <вказівка 1 >;
|
|
|
Службові слова, які використовуються в умовній вказівці, мають зміст if — якщо, then — то, else — інакше.
Умова — це вираз булевого типу. Умова може бути простою або складеною.
Наприклад.
1. Проста умова: а<5, с>=а, x=0, а<b
2. Складена умова (а>5) and (a<10 ), (а=2) or (b=3)
Складена умова записується з допомогою логічних операцій and — і, or — чи, not — не. При записі умови можна використовувати всі можливі операції відношення. Результатом виразу умови завжди буде величина булевого типу.
Логічні вирази
Результатом виконання логічного виразу є логічне значення True або False. Операндами е дані тільки булевого типу.
Логічні вирази утворюються з допомогою логічних операцій і круглих дужок. Список логічних операцій наведено в таблиці. Логічний вираз — це засіб записування умов для відшукання потрібних даних. Логічний вираз може приймати значення true (істинність) або false (хибність). Логічні вирази бувають прості та складені. Простий — це два арифметичні вирази, з’єднані символом відношення, а складений — це прості логічні вирази, з’єднані назвами логічних операцій: not, and i or.
Логічні операції над даними типу boolean
Операнд1 |
Операнд2 |
not |
and |
or |
xor |
false |
— |
true |
— |
— |
— |
true |
— |
false |
— |
— |
— |
false |
false |
— |
false |
false |
false |
false |
true |
— |
false |
true |
true |
true |
false |
— |
false |
true |
true |
true |
true |
— |
true |
true |
false |
Повна форма вказівки розгалуження виконується таким чином:
— якщо умова істинна, то виконується вказівка 1, а потім вказівка, яка знаходиться в програмі після всієї вказівки розгалуження;
— якщо умова хибна, то виконується вказівка 2, а потім вказівка, яка знаходиться після вказівки розгалуження.
Наприклад.
Program UMOVA;
Var A,B:integer;
begin
write('A=');
readln(A);
write('B=');
readln(B);
if A>B
then
writeln('A більше B')
else
writeln('B більше А');
end.
Скорочена форма вказівки розгалуження виконується таким чином:
— якщо умова істинна, то виконується вказівка1, а потім вказівка, яка знаходиться в програмі після всієї вказівки розгалуження;
— якщо умова хибна, то виконується вказівка, яка знаходиться після вказівки розгалуження.
Наприклад.
Program UMOVA;
Var A,B:integer;
begin
write('A=');
readln(A);
write('B=');
readln(B);
if A>B
then
writeln('A більше B');
writeln('B більше А');
end.
B даному випадку, якщо присвоїти А=2, В=5, то значення виразу умови А>В хибне, отже, на екрані з'явиться повідомлення — В більше А.
Примітка.
У вказівці розгалуження ";" ставиться тільки після вказівки 2.
Вказівка розгалуження може записуватися з використанням складеної вказівки таким чином.
if<умова>
then
begin
<вказівка 1>;
<вказівка 2>;
end
else
begin
<вказівка З>;
<вказівка 4>;
end;
Наприклад.
Program SUMMA:
Var A,B,R,S:integer;
begin
write(Введіть значення двох чисел');
readln(A,В);
R:=0;
S:=0;
if A>B then
begin
R:=A-B;
writeln('R=',R);
end
else
begin
S:=A+B;
writeln('S=',S);
end;
end.
B даному випадку, якщо присвоїти а=5, b=2, то на екрані з'явиться повідомлення — R=3.
Примітка.
Якщо після службового слова then використовується складена вказівка, то в ній після кожної вказівки ставиться ";", а після службового слова end "." не ставиться.