Методические указания по выполнению курсовой работы (1018767), страница 2
Текст из файла (страница 2)
пример из упражнения 1).Более простой способ записи - применение оператора Select Case. Синтаксис:Select Case ПеременнаяCase Значение1Последовательность операторов1...Case Значение(N-1)Последовательность операторов(N-1)[Case ElseПоследовательность операторовN]End SelectПример: проверка значения переменной xSelect Case xCase Is =3‘Выполнить некоторые действияCase Is>17‘Выполнить другие действияCase Else‘Действия для случая, когда не выполнено ниодно из предыдущих условийEnd SelectУПРАЖНЕНИЕ 1. ПРОГРАММИРОВАНИЕ УСЛОВИЙЗ а д а н и е . Составьте алгоритм и программу вычисления данных зависимостей.
Назначьте значения x отладочных тестов повсем ветвям (обратите внимание на особые точки). Выведите наэкран соответствующие зависимости параметра a и значения Y.Варианты заданий по упражнению 1 приведены в табл. 1.-8Таблица 1. Варианты заданий к упражнению 1.№Y=a=12a 2 + 7a − 2Y =+ X3x − 2.52Y =a+32Y = + a3xa+ 2.5 xa +1⎧ x + 1.5 x 3 + e x +1 ( −2 ≤ x ≤ 5)⎪⎪4.5 x + 1.5 (5 < x ≤ 7.5)a=⎨⎪ x + 1 ( x > 7.5)⎪⎩не определено ( x < −2)⎧3.5 x ( x ≥ −2)a=⎨⎩ x + 1.5 ( x < −2)⎧2 + 2 x ( x ≤ 4 )⎪a = ⎨3 (4 < x ≤ 5)⎪ x + 1 ( x > 5)⎩42.2a + 3.2a 2 − 2Y =x − 1.55x + (2.2a + xa )2Y =x +1x2ax6Y = 3x + a 2 −73x 2 + a 2Y = a + 2x +a+x8Y = 7.3 −a+ x 3a(1 + x )⎧2 sin x + 4 cos 2 x 2 (-1 ≤ x ≤ 1)⎪⎪ x + 3.5 (1 < x ≤ 5)a=⎨⎪− 4.6 ( x > 5)⎪⎩не определено ( x < −1)⎧5 + 2 x ( x ≤ 3)⎪a = ⎨4 (3 < x ≤ 7)⎪ x − 1 ( x > 7)⎩ππ⎧sinx+2cosx(≤x≤)⎪⎪22a=⎨⎪ x − 2.5 для остальных x⎪⎩ 2 + x⎧3.2 x + 1 x < 3.14⎪a = ⎨ x sin x ( x = 3.14)⎪ x ( x > 3.14)⎩⎧2 x + 1 ( x ≤ 2 )a=⎨⎩ x + 3 ( x > 2)-9-9Y =2+ a3 + exx10 Y = a + 2.8 x +x+a3− x11 Y = 2.5a 2 + a + x12 Y = a −x2a2 + x313 Y =+ a4x+214 Y =2+ x+ a 3 − 3xxππ4⎧ 2xx+(≤≤)⎪sin x + 222⎪⎪⎪5 ( π < x ≤ 2.5)a=⎨2⎪ x + 1 ( x > 2.5)⎪⎪не определено ( x < − π )⎪⎩2⎧4 x + 2.5 ( x ≤ 2.5)a=⎨⎩1.5 x + 8 для остальных x⎧5 ( x < 3)a=⎨⎩1.5 x + 8 ( x ≥ 3)⎧3.5 x ( x < 4)a=⎨⎩ x − 5 ( x ≥ 4)⎧3.7 x (-6 < x ≤ −3)⎪a = ⎨ x 2 + 3 x − 1 (-12 < x ≤ −6)⎪не определено для остальных x⎩⎧3.7 x (-6 < x ≤ −3)⎪a = ⎨ x 2 + 3x − 3 (-3 < x ≤ 8)⎪не определено для остальных x⎩Пример программного кода для варианта 1:Private Sub Командная_кн_Click()Dim Y As DoubleDim x As Double, a As DoubleDim strA As String, str1 As String, var1 As String, _var2 As String, var3 As StringstrA = "A=?"var1 = "x+1.5x^3+e^(x+1)"var2 = "4.5x+1.5"var3 = "x+1"x = Val(TxtX)If x >= -2 And x <= 5 Then-10a = x + 1.5 * x ^ 3 + exp (x + 1)strA = var1ElseIf x > 5 And x <= 7.5 Thena = 4.5 * x + 1.5strA = var2ElseIf x > 7.5 Thena = x + 1strA = var3Else: strA = "Not defined"End IfIf strA = "Not defined" Thenstr1 = "No"Else: Y=(2*a^2+7*a-1)/2.5+x^3str1 = Str(Y)End IfTxtA.Text = strATxtY.Text = str1End SubРис.1.
Пример пользовательского интерфейса к упражнению 1.ПРОГРАММИРОВАНИЕ ПОВТОРЕНИЙПовторение - многократное выполнение одного или нескольких предписаний алгоритма.Цикл - оператор, с помощью которого повторение будетвыполнено компьютером. Принято различать два типа циклов: сосчетчиком и с условием.-11Цикл со счетчиком. Синтаксис:For Имя=Значение1 To Значение2 [Step Значение3]ПовторяющиесяОператорыЦиклаNext[Имя]Имя - имя переменной, называемой счетчиком или индексом цикла, Значение1 - начальное значение счетчика, Значение2 - конечное значение счетчика, Значение3 - величина, накоторую изменяется значение счетчика за одно повторение, ПовторяющиесяОператорыЦикла - часть программы, котораядолжна повториться.В процессе выполнения этого оператора цикла в началепроводится проверка на непротиворечивость, если есть противоречие, то работа цикла прекращается и у счетчика остается егоначальное значение.
Если противоречия нет, то повторяющиесяоператоры будут выполнены при начальном значении счетчика,после чего его значение будет увеличено на шаг и будет сновапроведена проверка на превышение конечного значения.Циклы могут быть вложенными. Число повторений не всегда известно заранее тогда можно конечно, сделать переменнойконечное значение цикла. Однако, следует следить, чтобы этозначение было всегда определено до входа в цикл. По существуименно так организуется цикл с условием.Циклы с условием. Синтаксис цикла имеет две формы взависимости от местоположения условий.Форма 1.
Do УсловиеПовторяющиесяОператорыLoopЕсли условие стоит в первой строчке, то может случитьсятак, что ПовторяющиесяОператоры не будут выполнены ниразу. Иногда это полезно.Форма 2. DoПовторяющиесяОператорыLoop УсловиеВ этой форме ПовторяющиесяОператоры всегда будутвыполнены хотя бы один раз.Условие тоже бывает двух типов:−С ключевым словом While (условие продолжения цикла).В этом случае ПовторяющиесяОператоры выполняются, если-12значение УсловногоВыражения есть Истина (True), иначецикл завершается.−С ключевым словом Until (условие завершения цикла).
Вэтом случае ПовторяющиесяОператоры выполняются, еслизначение УсловногоВыражения есть Ложь (False), иначе циклзавершается.После ключевого слова должно следовать УсловноеВыражение. Итак, при организации циклов с условием возможны 4варианта:1234Do While......LoopDo Until ......LoopDo...Loop While...Do...Loop Until ...УПРАЖНЕНИЕ 2. ПРОГРАММИРОВАНИЕ ПОВТОРЕНИЙЗ а д а н и е . Вычислить сумму S, прекращая суммирование, когдаочередной член станет меньше eps=10-4 , при изменении аргумента xв указанном диапазоне [a,b] с шагом h. Для проверки в каждой точкевычислить также и функцию y=f(x), представляющую собой аналитическое выражение ряда.
Варианты заданий приведены в табл. 2.Рис. 2. Пример экранной формы в упражнении 2.Таблица 2. Задания для упражнения 2.№ вариантаS=y=∑ i 2 ⋅ x i−1235⋅xi −1i =1x 2i −1∑ (− 1) ⋅ (2i − 1)!i =1∞x 2 (i −1)i +11(−)⋅∑2(i - 1)!i =1∞(2 x )i∑ i!i =0∞i +16x 2i∑ (2i )!i =07x ( 2i +1)∑ (2i + 1)!i =08x ( 2i +1)∑ (− 1) ⋅ (2i + 1)i =0∞∞∞i00.90.1(1 − x )300.90.1sin x0.10.90.1cos x0.110.1e2x0.110.050.110.050.110.050.10.50.051 + 6x + x 2e x + e−xchx =2xe − e−xshx =2arctgx-13-4∑ (2i − 1)2h=(1 − x )3i =1∞b=1+ x∞1a=Продолжение таблицы 2.∞∑ (2i + 1) ⋅ x i9i =0∞11cos(ix )i2∑ (− 1)10ii =1∞i +1(x )ii =11213∞∑ (− 1)i +1i =1∞∑i =0x 2i⋅2i(2i − 1)(2i + 1)x2ii!x −200.90.05-0.50.50.1-0.50.50.10.10.80.050.110.10.210.08π234ln(1 + x )x ⋅ arctg ( x ) −− ln 1 + x2(1 + 2 x )⋅ e2x2-14-∑ (− 1)i1+ x(1 + x )22 i +114⎛ x − 1⎞⎟∞ ⎜x1+∑ ⎝ (2i +⎠1)i =0ln x2-15У к а з а н и я : При выполнении этого упражнения для вывода значений аргумента, суммы ряда и функции удобно применить элементуправления, называемый ListBox (Список).
Для вывода следует объединить эти значения в несколько одну строку. Для добавлениястрок в список применяется метод AddItem. Примеры программногокода и интерфейса (см. рис. 2) варианта 4 приведены ниже:Листинг программы:Private Sub StartCommand_Click()Dim a As Double, b As Double, _h As Double, st As Double, _epsilon As Double, member As Double, y As Double,Dim mi as Long, fc as LongDim i As Integer, j As IntegerDim tmps As Stringa = Val(LeftSideText.Text)b = Val(RightSideText.Text)h = Val(StepText.Text)epsilon = Val(PrecisionText.Text)st = aDo While st <= bi = 0mi = 1s = 0Domember = mi * (st ^ (2 * i))fc = 1For j = 1 To 2 * iFc = fc * jNext ji = i + 1member = member / fcs = s + membermi = mi * (-1)Loop Until Abs(member) < epsilony = Cos(st)tmps = Str(st)tmps = tmps + "" + Str(s)tmps = tmps + "" + Str(y)OutputList.AddItem (tmps)st = st + hLoopEnd Sub-16ОСНОВНЫЕ СВЕДЕНИЯ О ГРАФИЧЕСКИХ СРЕДСТВАХ VBВ данном разделе изучаются объекты: Form (Экранная форма)и PictureBox (Графическое окно).
При работе с графикой для этихэлементов управления могут быть применены следующие методы:− Scale (масштабирование) - для задания определяемой программой декартовой системы координат;− Pset (Point Set)- для изображения точки в заданной системе координат;− Line - для изображения на данном объекте отрезка с заданными декартовыми координатами его концов или прямоугольник сзаданными декартовыми координатами его углов;− Circle - для построения кругов и эллипсов, дуг и секторов;− Cls - для очистки данного объекта от всего, что было на немсозданос момощью графических методов и метода Print;− Print - для печати на объекте символов.Для того, чтобы выяснить, какими методами владеет класс объектов, можно обратиться к Окну просмотра характеристик, открывего щелчком кнопки Object Browser на Главной панели проекта иливыбрав соответствующую команду из меню View.
После этого в списке Classes следует указать необходимый класс объектов и просмотреть появившийся справа список с его характеристиками.М е т о д ScaleОбъекты Form и PuctureBox задаются по умолчанию абсолютными координатами левого верхнего угла от левого верхнего углана экране и размерами. Единицей измерения служит твип (1твип=1/1440 от логического дюйма, т.е. от такого расстояния наэкране, которое при печати на принтере будет равно 1 дюйму).Текущие координаты курсора мыши в твипах можно увидеть напанели инструментов.
Для этого применяется М е т о д Scale:[ИмяОбъекта.]Scale (X1,Y1)-(X2,Y2)Здесь в условных единицах, вычисляемых относительноразмеров объекта, записываются новые координаты левого верхнего и правого нижнего углов Объекта.Пример: запись оператораPicture1.Scale (-7,5)-(7,-5)помещает начало координат в центр объекта Графическое окно сименем Picture1, которое уже имеется на экранной форме и которое разделено нами на 14 условных единиц по ширине и 10 условных единиц по высоте.-17Того же результата можно добиться, если установить соответствующие свойства объекта Picture1:− значение свойства ScaleMode = 0 (User);− ScaleWidth = 14 (разность координат правого и левого краев);− ScaleHeidth = -10 (разность координат нижнего и верхнегокраев)− ScaleLeft = -7− ScaleTop = 5М е т о д Pset[ИмяОбъекта.] PSet (X,Y)[, Цвет]Задаются координаты точки и целое число типа Long для кодировки цвета.