3. Типы данных

Загрузите программу Visual Basic.
Создайте форму, изображенную на рисунке.

Экранная форма

На основе созданной формы разработайте программу, позволяющую определять, какие значения данных различных типов (целого, вещественного и даты) соответствуют значению строки, заданной в поле ввода. Для ознакомления с использованием функций преобразования типов данных и форматирования загрузите файл vbfunction.chm (путь к файлу указывает преподаватель).

4. Линейное программирование

Задание.

Найти значение функции:при любом заданном х

Прежде чем выполнить это задание познакомимся с основами алгоритмизации и построения блок схем.

Алгоритм, составленный для некоторого исполнителя, можно представить различными способами: с помощью графического или словесного описания, в виде таблицы, последовательностью формул, записанным на алгоритмическом языке (языке программирования). Остановимся на графическом описании алгоритма, называемом блок-схемой. Этот способ имеет ряд преимуществ: благодаря наглядности, обеспечивающей, в частности, высокую «читаемость» алгоритма и явное отображение управления в нем.

Прежде всего, определим понятие блок-схемы. Блок-схема - это ориентированный граф, указывающий порядок исполнения команд алгоритма.

Основные элементы языка блок-схем:

Элемент	Описание
	Начало или конец алгоритма
	Выполнение операций, изменяющих команды (группы команд)
	Ввод - вывод данных
	Условный переход

Для нашей задачи мы составляем следующий алгоритм:

Разработайте пользовательский интерфейс, расположив на форме следующие объекты управления: Label (Метка), TextBox (Текстовое поле), CommandButton (Командная кнопка). В окне Properties (Свойства) для каждого объекта управления установить свойства, приведённые в табл.2.

Таблица 2.

Элемент управления	Свойства	Значения
UserForm	Caption	Линейное программирование
Label1	Caption	Вычисление значения функции y=sin5x+cos3x
Label2	Caption	X=
Label3	Caption	Y=
TextBox1	Name	txtArgument
TextBox2	Name	txtFunction
CommadButton1	Name	cmdRun
CommadButton1	Caption	Вычисление
CommadButton2	Name	cmdClear
CommadButton2	Caption	Очистка

Для перехода в окно программирования нажмите правую кнопку мыши на объекте CommandButton и в появившимся контекстом меню выбрать команду View Code

Между строками «Private Sub cmdRun_Click()» и «End Sub» введите следующий код программы:

Dim Х As Single

Dim Y As Single

Х=Val(txtArgument.Text)

Y = Sin(5 * x) + Cos(3 * x)

txtFunction.Text = Str(Y)

Примерный интерфейс программы и контрольные значения: