УРОК 15.  КОНСТРУКЦИЯ IF-THEN-ELSE.

В 13 И 14 УРОКАХ МЫ С ВАМИ РАССМАТРИВАЛИ ПРОСТЕЙШУЮ КОНСТРУКЦИЮ ОПЕРАТОРА IF. ПОЛНЫЙ ЖЕ ОПЕРАТОР IF ВКЛЮЧАЕТ В СЕБЯ ДВА ВАРИАНТА ДЕЙСТВИЙ ВАШЕЙ ПРОГРАММЫ, В ЗАВИСИМОСТИ ОТ РЕЗУЛЬТАТА ПРОВЕРКИ УСЛОВИЙ. ВСЯ КОНСТРУКЦИЯ ВЫГЛЯДИТ ВОТ ТАК:

IF условие THEN

Оператор

ELSE

Оператор;

ОБРАТИТЕ ОСОБОЕ ВНИМАНИЕ НА НАПИСАНИЕ ЭТОЙ КОНСТРУКЦИИ, А ИМЕННО НА ТО, ЧТО В НЕЙ ИСПОЛЬЗУЕТСЯ ТОЛЬКО ОДНА ТОЧКА С ЗАПЯТОЙ, Т.К. КОНСТРУКЦИЯ СЧИТАЕТСЯ ОДНИМ ОПЕРАТОРОМ. ПРИМЕР:

IF Age <18 THEN

WRITELN (‘ВЫ НЕСОВЕРШЕННОЛЕТНИЙ!')

ELSE

WRITELN (‘ВОЗРАСТ СООТВЕТСТВУЮЩИЙ СОВЕРШЕННОЛЕТИЮ!’);

ДАВАЙТЕ ТЕПЕРЬ НЕМНОГО ИЗМЕНИМ ВЫШЕПРИВЕДЁННЫЙ ФРАГМЕНТ ПРОГРАММЫ, ИСПОЛЬЗАВАВ ДЛЯ ЭТОГО БЛОКИ BEGIN-END.

IF Age <18 THEN

BEGIN

WRITELN (‘ВЫ НЕСОВЕРШЕННОЛЕТНИЙ!’);

WRITELN (‘ПРОДАЖА СИГАРЕТ НЕСОВЕРШЕННОЛЕТНИМ ЗАПРЕЩЕНА!’);

END

ELSE

BEGIN

WRITELN (‘ВЫ СОВЕРШЕННОЛЕТНИЙ!');

WRITELN (‘ВЫМ ПОКУПКА ТАБАЧНЫХ ИЗДЕЛИЙ РАЗРЕШЕНА!’)

END;

ОБРАТИТЕ ВНИМАНИЕ НА СЛОВО END ПЕРВОГО БЛОКА, А ИМЕННО НА ТО, ЧТО ТОЧКА С ЗАПЯТОЙ ПОСЛЕ НЕГО НЕ СТАВИТСЯ, Т.К. ЭТО ЕЩЁ НЕ КОНЕЦ ОПЕРАТОРА!!!!!!!!!!!!

ПОПРОБУЙТЕ СОСТАВИТЬ ПОЛНУЮ ПРОГРАММУ С ИСПОЛЬЗОВАНИЕМ ЭТОЙ КОНСТРУКЦИИ. СЧИТАЙТЕ, ЧТО ЭТО ВАШЕ ДОМАШНЕЕ ЗАДАНИЕ!