Вычисления по формулам. Разветвления. Циклы

Особенности вычисления по формулам в Microsoft Visual Basic с использованием функции If. Применение циклов и разветвлений. Визуальные объекты, составление алгоритмов задачи, блок-схемы и программного кода. Введение переменных, определение типа данных.

Рубрика Программирование, компьютеры и кибернетика
Вид лабораторная работа
Язык русский
Дата добавления 23.05.2014
Размер файла 558,5 K

Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже

Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.

Размещено на http://www.allbest.ru/

МИНИСТЕРСТВО ОБРАЗОВАНИЯ И НАУКИ УКРАИНЫ

ДОНЕЦКИЙ НАЦИОНАЛЬНЫЙ УНИВЕРСИТЕТ

УЧЕБНО-НАУЧНЫЙ ИНСТИТУТ "ЭКОНОМИЧЕСКАЯ КИБЕРНЕТИКА"

КАФЕДРА ЭКОНОМИЧЕСКОЙ КИБЕРНЕТИКИ

ОТЧЕТ ПО ЛАБОРАТОРНОЙ РАБОТЕ 1

по дисциплине: "Основы программирования экономических задач"

на тему: "Вычисления по формулам. Разветвления. Циклы"

Студента I курса Нагорнюка Игоря

Преподаватель С.И. Левицкий

2014

Цель работы: научить вычислять по формулам в Microsoft Visual Basic, с использованием функции If, а также применяя циклы и разветвления.

Условия:

Визуальные объекты VB:

Задание А)

В Form1 добавляем объекты:

- Скроллинг "Frame":

"Frame1"= a)

текстовое поле "Label" добавляем следующие значения параметров:

"Label1" = "Результат: С=",

"Label2" = "X=",

"Label3" = "Y=",

"Label4" = "a=" "Label5" = "b="

поля ввода данных "Text":

Y = text1. text

C = text2. text

X = text3. text

a = text4. text

b = text5. text

кнопку "Вычислить" Command1_Click

Рис 1. Блок-схема к примеру а)

Программный код:

Private Sub Command1_Click ()

Text4. Text = Cos (Text1. Text) ^ 2 - Log (Text3. Text)

Text5. Text = Sqr (Text3. Text + 4 + Sin (Text1. Text))

Text2. Text = (Cos (Text4. Text - Text5. Text) + 1) / (Exp (Text4. Text) + Text5. Text)

End Sub Задание Б)

В Form1 добавляем объекты:

- Скроллинг "Frame":

"Frame2"= б)

текстовое поле "Label" добавляем следующие значения параметров:

"Label6" = "Результат: S=",

"Label7" = "a=",

"Label8" = "b=",

поля ввода данных "Text":

S = text6. text

a = text7. text

b = text8. text

кнопку "Вычислить" Command2_Click

Рис 2. Блок-схема к примеру б)

Программный код:

Private Sub Command2_Click ()

If Text7. Text * Text8. Text > Sin (Text7. Text) Then Text6. Text = 0.873 * Cos (Text7. Text ^ 3) - Text8. Text

If Text7. Text * Text8. Text = Sin (Text7. Text) Then Text6. Text = 2.3 - Cos (Text8. Text) ^ 2 - Text7. Text

If Text7. Text * Text8. Text < Sin (Text7. Text) Then Text6. Text = Log ( (Text7. Text ^ 3) + (Text8. Text ^ 2))

End Sub

Задание В)

В Form1 добавляем объекты:

Скроллинг "Frame":

"Frame3"= в)

текстовое поле "Label", содержащие следующие значения:

"Label9" = "b",

"Label10" = "h",

"Label11" = "X",

"Label11" = "c",

"Label12" = "z"

поля "Text", для ввода следующих значений:

h = text10. text

X = text11. text and text12. text

текстовое поле "ListBox", содержащие вычисления следующих переменных:

"ListBox1" = b

"ListBox2" = c

"ListBox3" = Z

кнопку "Вычислить" Command3_Click

Рис 3. Блок-схема к примеру в)

Программный код:

Private Sub Command3_Click ()

For x = Val (Text11. Text) To Val (Text12. Text) Step Val (Text10. Text)

b = 0.01 * x + Exp (0.7)

C = 1/x + Log (Abs (x))

List1. AddItem (Str (b))

List2. AddItem (Str (C))

If x <= - 0.9 Then s = x ^ 3 + 2 * b

If x > - 0.9 And x < - 1.3 Then s = C * Sqr (Abs (x) ^ 3 + 2)

If x >= 1.3 Then s = Log (Sqr (Abs (x ^ 3 + 2)))

s = "0" + s

List3. AddItem (s)

s = ""

Next x

End Sub

разветвление цикл алгоритм программный

Выводы

В результате сделанной лабораторной работы я:

1) Научился использовать условный оператор If

2) Вводить переменные, а также определять тип данных

3) Составлять алгоритм решения поставленных задач

4) Научился правильно применять и записывать математические операторы

Размещено на Allbest.ru


Подобные документы

  • Составление блок-схемы алгоритма решения задачи, погрешности вычисления суммы членов числового ряда. Разработка программ на языке на Visual Basic, работа с массивами. Особенности работы со строковыми данными. Варианты реализации формы приложения.

    контрольная работа [220,4 K], добавлен 18.06.2010

  • Создание программного модуля для вычисления интеграла по формулам трапеции и Симпсона, определяя шаг интегрирования по оценке остаточного члена. Для разработки используется табличный процессор Excel и язык программирования Visual Basic for Application.

    курсовая работа [159,7 K], добавлен 30.08.2010

  • Решение задачи вычисления и вывода значений функций. Разветвляющиеся и циклические вычислительные процессы. Задача табулирования. Блок схема и код программы. Вычисления по рекуррентным формулам. Программирование вложенных циклов. Сумма элементов матрицы.

    контрольная работа [1,1 M], добавлен 10.12.2013

  • Разработка различных программ для вычисления X и Y по формуле, для вычисления интеграла, для вычисления таблицы значений функции и для вычисления элементов вектора. Составление блок-схемы программы. Ввод значений, описание переменных и условия расчета.

    контрольная работа [148,1 K], добавлен 08.11.2013

  • Составление программы для вычисления по двум формулам одной и той же переменной "X". Создание программы, которая по введенному значению аргумента вычислят значение функции, заданной в виде графика. Вывод на экран значения функции, заданной графически.

    курсовая работа [4,9 M], добавлен 14.03.2014

  • Методы и алгоритмы вычисления определенных интегралов: метод трапеций и метод Симпсона (метод парабол). Оформление функции вычисления заданного определённого интеграла на Visual Basic 6.0. Программный код функции. Создание приложения для вычисления.

    курсовая работа [483,6 K], добавлен 25.06.2014

  • Разработка и анализ алгоритмов с использованием электронных таблиц и прикладных программ Smath Studio, Microsoft Excel. Проверка алгоритма ветвления или выбора. Реализация циклов на примере вычисления определённого интеграла с заданной точностью.

    контрольная работа [1,0 M], добавлен 19.03.2016

  • Программирование линейных и ветвящихся процессов; циклов с предусловием, постусловием и параметром для вычисления сложных сумм и произведений рядов; таблицы значений функции двух переменных. Блок-схемы алгоритмов. Тексты программ и результаты их работы.

    курсовая работа [2,4 M], добавлен 11.03.2015

  • Рабочая среда Visual Basic (VB) и ее основные компоненты. Ввод и вывод данных в VB. Объявление переменных и констант в программе. Создание и работа с процедурами и функциями, их виды. Организация ветвления в VB. Использование циклов в программировании.

    практическая работа [502,5 K], добавлен 26.10.2013

  • Описание работы ЭВМ при выполнении программы по указанной блок-схеме и исходным данным. Составление линейной программы на языке Basic в виде подпрограммы-функции для вычисления заданной величины. Разработка в ЭТ Excel макроса для указанной функции.

    контрольная работа [765,6 K], добавлен 16.10.2011

Работы в архивах красиво оформлены согласно требованиям ВУЗов и содержат рисунки, диаграммы, формулы и т.д.
PPT, PPTX и PDF-файлы представлены только в архивах.
Рекомендуем скачать работу.