PRINT “Минимальное значение”; MIN

В данном случае введена переменная – эталон с именем MIN

Конструкция IF…THEN END IF (“если − то” многострочная)

Рассмотренные конструкции оператора IF требуют их написания в одной строке кода программы. Но если после проверки условия необходимо выполнить несколько действий, писать их одной строкой становится затруднительно.

Выход из этой ситуации предлагает конструкция IF…THEN END IF

Формат конструкции: … IF условие THEN действие 1 действие 2 … действие n END IF …

Блок-схема конструкции:

Количество операторов, расположенных в теле конструкции ограничивается только размерами файла, занимаемого программой. Элементы оператора IF и END IF должны быть первыми элементами в своих строках кода программы. После THEN все операторы тела конструкции начинают записывать с новой строки.

Задание: Ввести значение X, извлечь из него квадратный корень и вывести результат. Если значение X меньше нуля, то сообщить «Введено отрицательное значение X» и умножить X на -1. Вывести значение подкоренного выражения.

CLS INPUT “Введите значение x”; x IF x < 0 THEN PRINT “Введено отриц. Значение X” X = X * (-1) END IF PRINT “Корень квадратный из X”; SQR(x) END

Конструкция IF…THEN…ELSE…END IF (“если – то − иначе” многострочная)

Эта конструкция многострочный аналог функции IF… THEN…ELSE

Формат конструкции: … IF условие THEN действие 1 действие 2 … действие n ELSE действие 1 действие 2 … действие m END IF …

Блок-схема конструкции:

Задание: Ввести A и В. Если они имеют одинаковый знак (обе положительные или обе отрицательные) то рассчитать и вывести большее из них, иначе – рассчитать и вывести меньшее.

Соответствие знаков переменных A и B проверяется условием A * B > 0. Если знаки идентичны – условие выполняется.

Большее из двух чисел определяется формулой (A + B + ABS(A - B)) / 2

Меньшее – соответственно (A + B − ABS(A-B)) / 2

CLS INPUT “Введите значения А, В”; A, B IF A * B > 0 THEN maxAB = (A + B + ABS(A − B)) / 2 PRINT “Максимум =”; maxAB ELSE minAB = (A + B – ABS(A − B)) / 2 PRINT “Минимум =”; minAB END IF END

Элементы многострочных операторов IF, ELSE и END IF должны быть первыми элементами в своих строках кода программы.

Конструкция IF…THEN…ELSEIF…ELSE…END IF (“перебор условий” или “выбор”)

Главной особенностью такой записи является дополнительное условие ELSEIF. Фактически ELSEIF – это ELSE снабженное индивидуальным условием IF. Условие определяет выполнение или невыполнение следующего за ELSEIF блока операторов.

Формат конструкции: … ... IF условие 1 THEN Блок операторов_1 ELSEIF условие 2 THEN Блок операторов_2 ... ELSEIF условие n THEN Блок операторов_n ELSE Блок операторов_n+1 END IF ...

Блок-схема конструкции:

Конструкция, в случае невыполнения первого условия переходит к проверке второго (в первом элементе ELSEIF) и т.д. Таким образом, реализуется возможность проверки нескольких условий.

Задание:Ввести целое число X в диапазоне от 0 < X < 100000. Определить сколько цифр входит в число. Вывести результат.