Тема: Логические операции.

Урок №.  Тема: Логические операции.  Цель: Цели урока:  Образовательная: Познакомить учащихся с применением логических операций AND (И) и OR (ИЛИ) в Visual Basic. Научить учащихся составлять программы с использованием этих операций.  Развивающая: Развивать у учащихся навыки работы с ПЭВМ, память, внимание, мышление, речь,  кругозор.  Воспитательная : Воспитывать у учащихся интерес к предмету, бережное отношение к учебной технике. Обеспечение занятия: 1). ПК – ЭВМ 2). Раздаточный материал  – 12 шт. Литература: Н.Г. Волченков «Программирование на Visual Basic 6.0 » С.Н Лукин «Самоучитель работы на Visual Basic 6.0» Вид занятия:  комбинированное – 1ч. План занятия: 1. Организационный момент 2. Опрос по домашнему заданию 3. Изложение новой темы 4. Практическая работа 5. Д/з Х О Д   У Р О К А . – – – 15 –   2 10 15   3 – 1. Организационный момент (Приветствие, проверка посещаемости, объявление целей и задач урока)  2. Опрос по домашнему заданию 10 – –   2 Задача №1.  Можно ли находить максимальное из двух чисел с помощью одинарного, а не  двойного условного перехода, как это делается? Составьте программу.   3.Изложение новой темы Логические операции Применение вложенных If создает довольно громоздкую, трудную для понимания  программу. Поэтому в Visual Basic есть возможность записывать многие программы короче и понятнее, используя вместо вложенных друг в друга If только один If. Для этого используются так называемые логические операции. 15 – В Visual Basic можно выделить пять основных и важных логических операторов:  And, Or, Not, Xor и Eqv.  And Возвращает результат конъюнкции (логического И) для двух выражений.  Синтксис:  результат = выражение1 And выражение2  А теперь маленький пример: Представим себе, что переменные Bul1 и Bul2 объявлены как булевы значения и в процессе каких­нибудь действий приняли значения либо True либо False. Вы устанавливаете  условие, проверяющие эти значения:  Мы же сэмулируем это сами :) ­ впишите куда ­ нибудь следующие строки:  Dim Bul1 As Boolean  Dim Bul2 As Boolean  Bul1= True   Bul2= True  If Bul1And Then Bul2    MsgBox " And  Возвращает результат конъюнкции (логического И)!"  End If  Следующий оператор Or.  Выполняет операцию логического ИЛИ (сложения) для двух выражений.  Синтаксис:  результат = выражение1 Or выражение2  Результат будет истинным только в том случае, если только одно из выражений истинно.  И снова маленький пример с прежними булевыми перменными  Bul1 и Bul2, которые в  процессе каких­нибудь действий приняли значения либо True либо False.  Dim Bul1 As Boolean  Dim Bul2 As Boolean  Bul1= False  Bul2= True  If Bul1 Or  Bul2  Then  MsgBox «оператор Or. Выполняет операцию логического ИЛИ (сложения) для двух  выражений !"  End If  Оператор Not.  Выполняет над выражением операцию логического отрицания.  Синтаксис:  результат = Not выражение  Т.е. результат стаёт противополжным выражению (исключая Null).  Оператор Xor.  Выполняет операцию исключающего ИЛИ для двух выражений.  Синтаксис:  [результат =] выражение1 Xor выражение2  В принципе, этот оператор похож на Or, но это не просто ИЛИ, а исключающее ИЛИ. Если  одно и только одно из выражений истинно (имеет значение True), результат имеет значение  True.  Оператор Eqv.  Help:  Используется для проверки логической эквивалентности двух выражений.  Синтаксис: результат = выражение1 Eqv выражение2  Тут совсем всё просто: результат будет истинным в том случае, если оба выражения либо  истинны, либо ложны.  Давайте все логические операции разберем на примерах. Задача "Давай поженимся 1". Ведущие программы «Давай поженимся» перебирали  претендентов для следующей программы – огромное количество анкет. Участнице  программы нравятся только высокие и блондины. Устав перебирать анкеты и отбирать из  них подходящих, поставили компьютер, написав для него программу, которая говорит ОН  НАМ ПОДОЙДЕТЕ тем, кто блондин и рост выше 170 см. Остальным программа говорит  ДО СВИДАНИЯ. Вот эта программа: Dim Tsvet As String 'Цвет волос Dim Rost As Integer: 'Рост Private Sub Command1_Click() Tsvet = InputBox("Каков цвет ваших глаз?") Rost = InputBox("Введите ваш рост в сантиметрах") If Tsvet = "Блондин" And Rost > 170 Then Print "ОН НАМ ПОДОЙДЕТЕ" Else Print "ДО  СВИДАНИЯ" End Sub Мы видим, что условие в операторе If уже не такое простое, как мы описывали раньше, а  сложное, то есть состоящее из двух условий, соединенных знаком логической операции  And (переводится "и"). Весь оператор If можно прочесть так – если Вы блондин И рост  выше 170  сантиметров, то печатай ОН НАМ ПОДОЙДЕТЕ, иначе печатай ДО  СВИДАНИЯ. Знак логической операции And, поставленный между двумя условиями, говорит о  том, что должны выполняться сразу оба эти условия. Программа для задачи ПОПАЛ ­ НЕ ПОПАЛ при использовании логических операций  значительно упростится: Private Sub Command1_Click() a = InputBox("Введите дальность выстрела") If a > 28 And a < 30 Then MsgBox ("ПОПАЛ") Else MsgBox ("НЕ ПОПАЛ") End Sub Задача "Давай поженимся 2". Следующей претендентки для участия в программе нравятся  все высокие независимо от цвета волос и все блондины независимо от роста. Программа  «Давай поженимся 2» будет отличаться от программы «Давай поженимся 2»одним единственным знаком логической операции: If Tsvet ="Блондин" Or Rost>170 Знак логической операции Or переводится "или". Поставленный между двумя условиями, знак Or говорит о том, что достаточно, если  будет выполняться хотя бы одно из них. Логические выражения Выражения a>b 66 a > 28 And a < 30 Tsvet ="Русый" Or Rost>170 a>2 Or x=b Or c<>1 имеют ту общую черту, что про каждое из них можно сказать, верно  оно или нет в каждый момент времени. Такие выражения называются логическими  выражениями. Если логическое выражение верно, то говорят, что оно имеет значение  True (Правда). Если логическое выражение неверно, то говорят, что оно имеет значение  False (Ложь). Любое логическое выражение может стоять в качестве условия в операторе  If. Логические выражения могут быть сложными ­ содержать одновременно операции And, Or, Not. Например, такое: a>2 And Not b>3 Or s>8 Чтобы его понять, нужно знать порядок действий. В арифметике сначала выполняется  умножение, потом сложение. В логических выражениях сначала выполняется Not, затем  And, затем Or. Для облегчения понимания не возбраняется расставлять скобки: (a>2 And (Not b>3)) Or s>8 Это выражение равносильно предыдущему. Скобки можно расставлять и чтобы изменить порядок действий: a>2 And Not (b>3 Or s>8) Примеры: ФРАГМЕНТ РЕЗУЛЬТАТ a=8: b=6: If a>b And b>7 Then k=1 Else k=0 k=0 a=8: b=6: If a>b Or b>7 Then k=1 Else k=0 k=1 a=8: b=6: If a7 Then k=1 Else k=0 k=0 a=8: b=6: If Not a=8 Then k=1 Else k=0 k=0 4.Практическая работа – 15 Задание 1: "Давай поженимся 3". Определите, кто нравится невесте, по фрагменту из ее  программы: If Tsvet ="Карий " And (Rost<180 Or Rost>184) Then Print "ВЫ МНЕ ПОДОЙДЕТЕ" Else  Print "ДО СВИДАНИЯ" Задание 2: Усложним нашу задачу про ПОПАЛ ­ НЕ ПОПАЛ: Человек вводит в  компьютер число. Если оно находится в интервале от 28 до 30, то нужно напечатать текст  ПОПАЛ, если оно больше или равно 30 ­ то ПЕРЕЛЕТ, если оно находится на отрезке от 0 до 28, то НЕДОЛЕТ, если число меньше нуля ­ НЕ БЕЙ ПО СВОИМ. Задание 3: Человек вводит с клавиатуры строку, смысл которой ­ приветствие при встрече.  Компьютер тоже должен ответить приветствием. Отвечать нужно в соответствии со  следующей таблицей: ПРИВЕТСТВИЕ ЧЕЛОВЕКА ОТВЕТ КОМПЬЮТЕРА Привет Привет Здравствуйте Здравствуйте Добрый день Салют Приветик Салют Салют Салют Здравия желаю Вольно Любое другое приветствие Я вас не понимаю. 5.  Задание на дом Поработать с конспектом. Составить  и решить задачу на логические.   Примечание: при изучении нового материала учащиеся делают в тетрадь необходимые записи под руководством учителя.