Вкладений оператор IF

Умовний оператор if може містити в свою чергу також оператор if, наприклад:

IF V1 THEN IF V2 THEN S1 ELSE S2

FALSE

TRUE (V1)

FALSE

(V2)

S1

TRUE

S2

S1

S2

Проте, щоб з’ясувати процес виконання такої канструкції, треба знати, як обробляється оператор IF. Для уникнення помилки краже використовувати операторні дужки:

IF V1 THEN BEGIN

IF V2 THEN S1

ELSE S2

END;

Приклад: Чи можна побудувати трикутник зі сторонами a,b,c?

а)

program triangle;

{в програмі визначається, чи можна побудувати трикутник зі сторонами a,b,c }

var a,b,c: real;

begin

writeln('Введіть сторони триктника a,b,c:');

readln(a,b,c);

if a<b+c then begin

if b<a+c then begin

if c<b+a then

writeln (' Трикутник побудувати можна ');

end

end

end.

б) скорочений варіант тієї ж програми, який використовує складну умову переходу у операторі if.

program triangle;

{ скорочений варіант програми triangle}

var a,b,c: real;

begin

writeln('введіть сторони тркутника a,b,c:');

readln(a,b,c);

if (a>=b+c) or (b>=a+c) or (c>=b+a)

then writeln('трикутник побудувати неможна')

else writeln('трикутник побудувати можна');

end.

Дата добавления: 2015-08-09