Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
PR27_Student.rtf
Скачиваний:
0
Добавлен:
01.07.2025
Размер:
580.83 Кб
Скачать

Булевий тип

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 "." не ставиться.

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]