рефераты конспекты курсовые дипломные лекции шпоры
- Раздел Компьютеры
- /
- Реализация алгоритма вычислительного процесса на языке Microsoft Visual Basic
Реферат Курсовая Конспект
Реализация алгоритма вычислительного процесса на языке Microsoft Visual Basic
Реализация алгоритма вычислительного процесса на языке Microsoft Visual Basic - раздел Компьютеры, Лабораторная Работа №2 Разветвляющиеся Вычислительны...
Лабораторная работа №2
Разветвляющиеся вычислительные процессы
Цель работы
1. Приобретение навыков по алгоритмизации и программирования разветвляющихся вычислительных процессов.
2. Реализация алгоритма вычислительного процесса на языке Microsoft Visual Basic.
Порядок выполнения работы
По номеру варианта выбрать из таблицы 2 задание и в соответствии с методическими указаниями, рекомендованной литературой и конспектом лекций написать программу для решения задачи на ЭВМ.
Содержание отчета
1. Исходные данные и постановка задачи.
2. Текст кода языке Microsoft Visual Basic.
3. Результаты расчета.
Задание к лабораторной работе
Часть 1.
1. только оператор IF; 2. оператор IF , операции AND (OR).Пример выполнения работы ( Часть 1 )
Задание
Вычислить значение Y в зависимости от условий двумя способами, используя:
1. только оператор IF;
2. оператор IF , операции AND (OR).
при
| Private Sub Command1_Click() '1 method x = Val(Text1.Text) If x < -1 Then y = 1 ElseIf x > 1 Then y = x Else y = x - 1 End If Label5.Caption = y End Sub Private Sub Command2_Click() End End Sub Private Sub Command3_Click() '2 method x = Val(Text1.Text) y = 1 If x >= -1 And x <= 1 Then y = x - 1 ElseIf x > 1 Then y = x End If Label5.Caption = y End Sub |
Задание к лабораторной работе
Часть 2.
Таблица 2 N варианта Формулы дляY …Пример выполнения работы ( Часть 2 )
Задание
Вычислить значение Y в зависимости от условий. Аргументы функции Y произвольные и вводятся с клавиатуры. Требуется учесть ОДЗ функций. Результат представить с двумя знаками после запятой.
| |
| Private Sub Command1_Click() a = Val(Text1.Text) b = Val(Text2.Text) c = Val(Text3.Text) x = Val(Text4.Text) pi = 3.1415926 If x < pi / 2 Then y = Abs(b * c * x ^ 2): Label7.Caption = Format(y, "###0.00") ElseIf x > pi / 2 Then If a <> 0 Then y = Cos(x / a): Label7.Caption = Format(y, "###0.00") Else Label7.Caption = "a=0" Else If b * c >= 0 Then y = Sqr(b * c): Label7.Caption = Format(y, "###0.00") Else Label7.Caption = "bc<0" End If End Sub Private Sub Command2_Click() End End Sub |
– Конец работы –
Используемые теги: Реализация, алгоритма, вычислительного, процесса, языке, Microsoft, Visual, BASIC0.111
Если Вам нужно дополнительный материал на эту тему, или Вы не нашли то, что искали, рекомендуем воспользоваться поиском по нашей базе работ: Реализация алгоритма вычислительного процесса на языке Microsoft Visual Basic
Что будем делать с полученным материалом:
Если этот материал оказался полезным для Вас, Вы можете сохранить его на свою страничку в социальных сетях:
| Твитнуть |
Хотите получать на электронную почту самые свежие новости?
Подпишитесь на Нашу рассылку
Реклама
Информация в виде рефератов, конспектов, лекций, курсовых и дипломных работ имеют своего автора, которому принадлежат права. Поэтому, прежде чем использовать какую либо информацию с этого сайта, убедитесь, что этим Вы не нарушаете чье либо право.
© copyright 1999 - 2024 allRefs.net. Все права защищены. Страница сгенерирована за: 0.183 сек.
Новости и инфо для студентов