Линейный синтаксис оператора If … Then

Отчет по лабораторной работе №3

По дисциплине информатика

Специальность 1-27-01-01 «Экономика и организация производства

Специализация 1-27-01-01-21 Общественное питание

Проверил Старший преподаватель Овсянникова И.П. «_____»________________2011г

Выполнила студентка группы ЭОП-111 МухаметзяноваЖ.А. «_____»________________2011г

 

 

Индивидуальное задание:

 

Составьте блок-схему и программу на языке VBA для проверки

направления ветвей параболы c x b x a y + × + × = 2

 

Исходные данные: Результат:

Введите a : 3

Введите b: 2

Введите c : 8

1. Ветви параболы направлены вверх

 

Введите a : 0 .

Введите b: 2

Введите c : 8

2. Это не парабола. Эта прямая

 

Рисунок 1

Листинг:

 

Sub парабола()

Dim a As Double, b As Double, c As Double

a = (InputBox("Введите число a", "Исходные данные"))

b = (InputBox("Введите число b", "Исходные данные"))

с = (InputBox("Введите число c", "Исходные данные"))

If a = 0 Then

MsgBox "прямая"

Else

If a > 0 Then

MsgBox "вверх"

Else

MsgBox "вниз"

End If

End If

End Sub

 

РАЗВЕТВЛЯЮЩИЕСЯ ПРОГРАММЫ

 

Оператор разветвляющейся структуры If … Then

 

Базовая структура разветвление (называемая также ЕСЛИ-ТО-ИНАЧЕ) обеспечивает в зависимости от результата проверки условия (истина или ложь) выбор одного из альтернативных путей работы алгоритма. Каждый из путей ведет к общему выходу (продолжению алгоритма). Работа алгоритма продолжается независимо от того, какой путь будет выбран. Возможные пути выполнения алгоритма помечаются на схемах алгоритмов соответствующими метками: "да"/"нет" (или "1"/"0"). Алгоритм, в состав которого входит базовая структура разветвление, называется разветвляющимся алгоритмом, а реализуемый им вычислительный процесс – разветвляющимся вычислительным процессом.

If … Then … Else– управляющий оператор, осуществляющий условное ветвление операций, основанное на оценке логического выражения. Выражение может быть истинным или ложным. Оператор имеет две формы записи –линейную и блочную.

 

Линейный синтаксис оператора If … Then

 

При линейном синтаксисе весь оператор записывается в одну строчку (перенос на новую строку не допускается).

 

If логическое _ выражение Then операторы 1 [Else операторы 2]

 

– логическое _ выражение – выражение, возвращающее не нулевое значение (истина) или ноль (ложь) (если логическое выражение состоит из нескольких составных частей, то они соединяются друг с другом посредством логических функций);

– операторы 1 – операторы, выполняющиеся при значении логического выражения "истина" (если операторов несколько штук, то один от другого отделяется двоеточием);

– операторы 2 – операторы, выполняющиеся при значении логического выражения "ложь" (если операторов несколько штук, то один от другого отделяется двоеточием).

 

Выражение, стоящее в квадратных скобках является не обязательным параметром. Таким образом, можно выделить два вида записи линейной формы – краткую и полную.

Краткая форма записи (Если … То …. ) не содержит часть Else операторы 2.

 

If логическое_выражение Then оператор1

 

– логическое _ выражение – любое логическое выражение, допустимое в Бейсике;

– оператор1 – любой оператор (или группа операторов в одну строку через разделитель – двоеточие) Бейсика, который исполняется при выполнении условия, заданного логическим_выражением. Действие оператора If поясняется блок-схемой, приведенной на рис. 1.

 

Рис. 1. Краткая форма оператора If … Then

 

Полная форма записи (Если … То …. Иначе) содержит часть Else операторы 2.

 

If логическое_выражение Then операторы 1 Else операторы 2

 

– операторы 2 выполняется только тогда, когда логическое_выражение ложно. Действие оператора If поясняется блок-схемой, приведенной на рис. 2.

 

Рис. 2. Полная линейная форма оператора If…Then

 

Пример 1.Определение количества знаков в числе от 0 до 1000

 

Sub lineynaya_forma_If()