- 1
- 2
ФГОУ ВПО
Уфимский государственный авиационный технический университет
Кафедра Информатики Создание проектов решения вычислительных задач на Visual Basic
ПОЯСНИТЕЛЬНАЯ ЗАПИСКА
.301003.000ПЗ Студент Мухаметдинов Р.Н. Уфа 2014 г.
ГОУ ВПО Уфимский государственный авиационный технический университет Рецензия на курсовую (контрольную) работу по информатике студента гр. П-214Сф факультета АП
Мухаметдинов Руслан Наилевич
Тема работы: Создание проектов решения вычислительных задач на Visual Basic
Вариант №: 3
Рецензент
Замечания
По результатам решения задач:
По содержанию и оформлению пояснить записки:
«_____» ___________ 20__ г. ____________________________
(подпись)
Содержание Главная форма и титульный лист
Задание 1
Постановка задачи
Блок-схема программы
Исходный текст программы
Результаты работы программы
Задание 2
Постановка задачи
Блок-схема программы
Исходный текст программы
Результаты работы программы
Задание 3
Постановка задачи
Блок-схема программы
Исходный текст программы
Результаты работы программы
Задание 4
Постановка задачи
Блок-схема программы
Исходный текст программы
Результаты работы программы
Список литературы
Главная форма и титульный листДля создания формы с краткой информацией о приложении (титульный лист курсовой работы) удобно использовать шаблон About Dialog . Пример оформления титульного листа курсовой работы в виде показан на рисунке 1.
Рисунок 1 - Титульный лист На главном окне приложения размещается меню, созданное с использованием кнопок (CommandButton) или текстового меню. Пример реализации главного окна приложения показан на рисунке 2.
Рисунок 2 - Главное окно приложения
Задание 1. «Сумма ряда»Постановка задачиВычислить значение суммы ряда 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 - Результаты работы программы
Задание 2. «Массивы»Постановка задачиДан двумерный массив (матрица) размером 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)=
- 1
- 2
Похожие работы
Тема: Расчет задач вычислительных систем |
Предмет/Тип: Информатика, ВТ, телекоммуникации (Контрольная работа) |
Тема: Модели решения функциональных и вычислительных задач |
Предмет/Тип: Отсутствует (Реферат) |
Тема: Решение вычислительных задач и создание компонентов Delphi |
Предмет/Тип: Отсутствует (Курсовая работа (т)) |
Тема: Компьютерное моделирование вычислительных задач в различных средах программного обеспечения |
Предмет/Тип: Информатика, ВТ, телекоммуникации (Курсовая работа (т)) |
Тема: Численные методы решения инженерных задач на электронных вычислительных машинах |
Предмет/Тип: Отсутствует (Контрольная работа) |
Интересная статья: Основы написания курсовой работы