Читать курсовая по информационному обеспечению, программированию: "Создание проектов решения вычислительных задач на Visual Basic" Страница 1

(Назад) (Cкачать работу)

ФГОУ ВПО

Уфимский государственный авиационный технический университет

Кафедра Информатики Создание проектов решения вычислительных задач на Visual Basic

ПОЯСНИТЕЛЬНАЯ ЗАПИСКА

.301003.000ПЗ Студент Мухаметдинов Р.Н. Уфа 2014 г.

ГОУ ВПО Уфимский государственный авиационный технический университет Рецензия на курсовую (контрольную) работу по информатике студента гр. П-214Сф факультета АП

Мухаметдинов Руслан Наилевич

Тема работы: Создание проектов решения вычислительных задач на Visual Basic

Вариант №: 3

Рецензент

Замечания

По результатам решения задач:

По содержанию и оформлению пояснить записки:

«_____» ___________ 20__ г. ____________________________

(подпись)

Содержание Главная форма и титульный лист

Задание 1

Постановка задачи

Блок-схема программы

Исходный текст программы

Результаты работы программы

Задание 2

Постановка задачи

Блок-схема программы

Исходный текст программы

Результаты работы программы

Задание 3

Постановка задачи

Блок-схема программы

Исходный текст программы

Результаты работы программы

Задание 4

Постановка задачи

Блок-схема программы

Исходный текст программы

Результаты работы программы

Список литературы

Для создания формы с краткой информацией о приложении (титульный лист курсовой работы) удобно использовать шаблон About Dialog . Пример оформления титульного листа курсовой работы в виде показан на рисунке 1.

Рисунок 1 - Титульный лист На главном окне приложения размещается меню, созданное с использованием кнопок (CommandButton) или текстового меню. Пример реализации главного окна приложения показан на рисунке 2.

Рисунок 2 - Главное окно приложения

Вычислить значение суммы ряда S. Сравнить полученное значение с точным решением Y, вычислив абсолютную и относительную погрешности. Для подсчета суммы используем цикл For … Next.

В цикле For используется переменная, называемая переменной цикла или счетчиком цикла (counter), которая увеличивается или уменьшается на заданную величину при каждом повторении цикла. [1, с.148]

Private Sub Command1_Click()s As Double.Cls.Cls.Cls.Cls= Val(Text1.Text)= 0k = 1 To m= 1j = 2 To 2 * k - 1= F * jj= s + (-1) (k - 1) / Fk.Print Format(s, "0.0000000000000")= Sin(1).Print Format(y, "0.0000000000000")= Abs(y - s).Print Format(da, "0.0000000000000")= da / y * 100.Print Format(dot, "0.0000000") + "%"SubSub Command2_Click().ShowSubSub Command3_Click()Sub

Результаты работы программы представлены на рисунке 3.

Рисунок 3 - Результаты работы программы

Дан двумерный массив (матрица) размером NxM.

. Определить произведение элементов, значения которых не кратны заданному числу F.

. Найти частное от деления максимального элемента массива и элемента с номером L.

. Упорядочить массив по убыванию элементов сверху вниз и слева направо.

Для выполнения данного задания необходимо знать, что такое массивы.

Массивы (arrays) позволяют ссылаться на ряд переменных с помощью имени и числа, называемого индексом массива (index). [1, с.127]

Dim Am(50, 50) As IntegerSub Command1_Click()p As DoubleMax As Integer, k As Integer, F As Integer, L As Integeri As Integer, j As Integer= Val(Text1.Text)= Val(Text5.Text)_min = Val(Text3.Text)_max = Val(Text4.Text)=

Похожие работы