Розглянемо приклад і на ньому сформулюємо рекомендації для уникання помилок при побудові складених умов.
Нехай у програмі вводяться два дійсних значення а та b і потрібно перевірити чи виконується для них умова, що точка c з координатами (x,y) потрапляє у заштриховану область.
Перш за все потрібно побудувати складену умову і розбити її на простіші.
Очевидно, що якщо точка потрапляє у заштриховану фігуру, то вона потрапляє або у прямокутник А, або у прямокутник В, або і у А, і у В, тобто на відрізок, що належить і А, і В.
Зрозуміло, що умова запишеться таким чином:
if (cÎA) or (cÎB) then
Тепер розпишемо окремо умови cÎA та cÎB.
Якщо cÎA, то виконується умова (-1£x£1) та (0£y£1/2)
Якщо cÎB, то виконується умова (-1/2£x£1/2) та (-1£y£0)
Тепер умова запишеться так:
if ((-1£x£1) and (0£y£1/2)) or ((-1/2£x£1/2) and (-1£y£0)) then
Але умови вигляду (-1£x£1) не сприймаються Delphi і їх потрібно розбивати на елементарні умови. Отже
(-1£x£1) матиме вигляд (x>=-1) and (x<=1)
(0£y£1/2) матиме вигляд (y>=0) and (y<=1/2)
(-1/2£x£1/2) матиме вигляд (x>=-0.5) and (x<=0.5)
(-1£y£0) матиме вигляд (y>=-1) and (y<=0)
Звідси остаточна умова матиме вигляд
if
(((x>=-1) and (x<=1)) and ((y>=0) and (y<=1/2)))
or
(((x>=-0.5) and (x<=0.5)) and ((y>=-1) and (y<=0)))
then …
Отже, на підставі прикладу можемо сформулювати рекомендації до запобігання помилок при використанні складеного оператору IF.
1. Спочатку чітку сформулювати складену умову
2. Розбити складену умову на логічні блоки умов
3. Виписати блоки умов і розбити їх на елементарні умови
4. Чітко слідкувати за місцем та кількістю дужок у складеній умові
