У нас можно недорого заказать курсовую, контрольную, реферат или диплом
«Создание проектов решения вычислительных задач на Visual Basic Вариант 24 с исходниками и пояснительной запиской» - Курсовая работа
- 13 страниц(ы)
Содержание
Введение
Выдержка из текста работы
Заключение
Список литературы
Автор: navip
Содержание
Окно проекта 3
Задача №1 5
Задача №2 7
Задача №3 12
Задача №4 14
Список литературы 17
Введение
Для создания создания формы с краткой информацией о приложении (титульный лист) был использован стандартный шаблон проекта «Standart Exe»(Рисунок 1).
Рисунок 1 – титульный лист.
На главном окне приложения размещается меню, созданное с использованием кнопок «Command Button» (Рисунок 2).
Рисунок 2 – Главное окно приложения.
Задача №1 «Сумма ряда»
1.1 Постановка задачи
Вычислить значение суммы ряда S. Сравнить полученное значение с точным решением Y, вычислив абсолютную и относительную погрешности.
1.2 Схема алгоритма
Рисунок 3 – Схема алгоритма
1.3 Исходный текст программы
1.4 Экранная форма программы с примером решения задачи
Рисунок 4 – Экранная форма программы
Задача №2 «Массивы»
1.1 Постановка задачи
Дан двумерный массив (матрица) размером NxN.
1. Определить количество элементов, имеющих нечетные значения.
2. Найти произведение максимального элемента массива и заданного числа
L.
3. Найти произведение элементов под главной диагональю.
1.2 Схема алгоритма
Рисунок 5 – схема алгоритма
Выдержка из текста работы
1.3 Исходный текст программы
1.4 Экранная форма программы с примером решения задачи
Рисунок 6 - Экранная форма программы
Для ввода значений переменных n (количество строк), m (количество столвцов), A_min и A_max) границы значений элементов массива, L (заданное число) используются текстовые поля (объект TextBox). Для ввода элементов массива (матрицы) использован генератор случайных чисел (Rnd). Для вывода элементов массива использовано окно списка (объект List).
Результаты решения задачи выводятся:
- Количество элементов имеющих нечетное значение (Text box);
- Произведение максимального элемента массива и заданного числа L (Text box);
- Произведение элементов под главной диагональю (Text box).
Задача №3 «Строки»
1.1 Постановка задачи
Дана строка символов, среди которых есть двоеточие (:). Определить, сколько символов ему предшествует.
1.2 Схема алгоритма
Рисунок 7 – Схема алгоритма
1.3 Исходный текст программы
1.4 Экранная форма программы с примером решения задачи
Рисунок 8 – Экранная форма программы
Задача №4 «Графика»
1.1 Постановка задачи
Построить график функции Y=1/(x2-3*x+2) на отрезке [-8, 2]
1.2 Схема алгоритма
Рисунок 9 – Схема алгоритма
1.3 Исходный текст программы
1.4 Экранная форма программы с примером решения задачи
Рисунок 10 – Экранная форма программы
VERSION 5.00
Begin VB.Form Form3
Caption = "Маликов А.С., ЭМ-111, Вариант 25"
ClientHeight = 5010
ClientLeft = 4485
ClientTop = 2925
ClientWidth = 5100
LinkTopic = "Form3"
ScaleHeight = 5010
ScaleWidth = 5100
Begin VB.CommandButton Command1
Caption = "Вычислить"
Height = 495
Left = 480
TabIndex = 14
Top = 4320
Width = 3975
End
Begin VB.PictureBox Picture4
Height = 375
Left = 2880
ScaleHeight = 315
ScaleWidth = 1515
TabIndex = 9
Top = 3720
Width = 1575
End
Begin VB.PictureBox Picture3
Height = 375
Left = 2880
ScaleHeight = 315
ScaleWidth = 1515
TabIndex = 8
Top = 3240
Width = 1575
End
Begin VB.PictureBox Picture2
Height = 375
Left = 2880
ScaleHeight = 315
ScaleWidth = 1515
TabIndex = 7
Top = 2760
Width = 1575
End
Begin VB.PictureBox Picture1
Height = 375
Left = 2880
ScaleHeight = 315
ScaleWidth = 1515
TabIndex = 6
Top = 2280
Width = 1575
End
Begin VB.TextBox Text3
Height = 375
Left = 2880
TabIndex = 3
Top = 1440
Width = 1575
End
Begin VB.TextBox Text2
Height = 375
Left = 2880
TabIndex = 2
Top = 960
Width = 1575
End
Begin VB.TextBox Text1
Height = 375
Left = 2880
TabIndex = 0
Top = 480
Width = 1575
End
Begin VB.Label Label7
Caption = "Относительная погрешность"
Height = 375
Left = 480
TabIndex = 13
Top = 3720
Width = 2295
End
Begin VB.Label Label6
Caption = "Абсолютная погрешность"
Height = 375
Left = 480
TabIndex = 12
Top = 3240
Width = 2295
End
Begin VB.Label Label5
Caption = "Точное значение"
Height = 375
Left = 480
TabIndex = 11
Top = 2760
Width = 2295
End
Begin VB.Label Label4
Caption = "Сумма ряда"
Height = 375
Left = 480
TabIndex = 10
Top = 2280
Width = 2175
End
Begin VB.Label Label3
Caption = "Значение переменной q"
Height = 375
Left = 480
TabIndex = 5
Top = 1440
Width = 2175
End
Begin VB.Label Label2
Caption = "Значение переменной а"
Height = 375
Left = 480
TabIndex = 4
Top = 960
Width = 2055
End
Begin VB.Label Label1
Caption = "Число членов ряда"
Height = 375
Left = 480
TabIndex = 1
Top = 480
Width = 2175
End
End
Attribute VB_Name = "Form3"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Private Sub Command1_Click()
Picture1.Cls
Picture2.Cls
Picture3.Cls
Picture4.Cls
n = Val(Text1)
a = Val(Text2)
q = Val(Text3)
s = 0
For k = 0 To n
s = s + a * q ^ k
Next
y = a / (1 - q)
z = y - s
d = z / y * 100
Picture1.Print Format(s, "00.00000")
Picture2.Print Format(y, "00.00000")
Picture3.Print Format(z, "00.00000")
Picture4.Print Format(d, "00.00000"); " %"
End Sub
VERSION 5.00
Begin VB.Form Form4
Caption = "Маликов А.С., ЭМ-111, Вариант 25"
ClientHeight = 6180
ClientLeft = 120
ClientTop = 450
ClientWidth = 9315
LinkTopic = "Form4"
ScaleHeight = 6180
ScaleWidth = 9315
StartUpPosition = 3 'Windows Default
Begin VB.ListBox List1
Height = 3765
ItemData = "задача 2.frx":0000
Left = 240
List = "задача 2.frx":0002
TabIndex = 18
Top = 2040
Width = 4815
End
Begin VB.CommandButton Command1
Caption = "Вычислить"
Height = 735
Left = 5280
TabIndex = 17
Top = 5160
Width = 3735
End
Begin VB.TextBox Text9
Height = 375
Left = 5280
TabIndex = 16
Top = 4560
Width = 3735
End
Begin VB.TextBox Text8
BeginProperty Font
Name = "MS Sans Serif"
Size = 12
Charset = 204
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 6120
TabIndex = 14
Top = 3000
Width = 2775
End
Begin VB.TextBox Text7
Height = 285
Left = 5280
TabIndex = 12
Top = 2400
Width = 3615
End
Begin VB.Frame Frame1
BackColor = &H8000000E&
Caption = "Данные"
Height = 1575
Left = 240
TabIndex = 0
Top = 240
Width = 8895
Begin VB.TextBox Text5
Height = 375
Left = 6240
TabIndex = 10
Top = 960
Width = 495
End
Begin VB.TextBox Text4
Height = 375
Left = 4320
TabIndex = 8
Top = 960
Width = 495
End
Begin VB.TextBox Text3
Height = 375
Left = 3240
TabIndex = 6
Top = 960
Width = 495
End
Begin VB.TextBox Text2
Height = 375
Left = 5400
TabIndex = 4
Top = 360
Width = 735
End
Begin VB.TextBox Text1
Height = 405
Left = 2400
TabIndex = 1
Top = 360
Width = 735
End
Begin VB.Label Label5
BackColor = &H8000000E&
Caption = " L"
Height = 495
Left = 5880
TabIndex = 9
Top = 960
Width = 495
End
Begin VB.Label Label4
BackColor = &H8000000E&
Caption = "до"
Height = 255
Left = 3960
TabIndex = 7
Top = 960
Width = 495
End
Begin VB.Label Label3
BackColor = &H8000000E&
Caption = "Границы значений элементов от"
Height = 375
Left = 360
TabIndex = 5
Top = 960
Width = 2655
End
Begin VB.Label Label2
BackColor = &H8000000E&
Caption = "Количество столбцов"
Height = 255
Left = 3480
TabIndex = 3
Top = 360
Width = 1815
End
Begin VB.Label Label1
BackColor = &H8000000E&
Caption = "Количество строк"
Height = 255
Left = 480
TabIndex = 2
Top = 360
Width = 1575
End
End
Begin VB.Label Label8
Caption = "Произведение элементов под главной диагональю"
Height = 375
Left = 5280
TabIndex = 15
Top = 3960
Width = 3615
End
Begin VB.Label Label7
Caption = "Max * L ="
Height = 375
Left = 5280
TabIndex = 13
Top = 3120
Width = 735
End
Begin VB.Label Label6
Caption = "Количество нечетных элементов"
Height = 255
Left = 5280
TabIndex = 11
Top = 2040
Width = 3495
End
End
Attribute VB_Name = "Form4"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Dim am(50, 50) As Integer
Private Sub Command1_Click()
List1.Clear
n = Val(Text1)
m = Val(Text2)
am_min = Val(Text3)
am_max = Val(Text4)
l = Val(Text5)
p = Val(Text6)
k = 0
q = 1
For i = 0 To n - 1
For j = 0 To m - 1
am(i, j) = am_min + Int(Rnd * (am_max - am_min))
stra = stra + Str(am(i, j))
Next
List1.AddItem stra
stra = ""
Next
List1.AddItem " "
For i = 0 To n - 1
For j = 0 To m - 1
If (am(i, j) / 2) <> Fix(am(i, j) / 2) Then k = k + 1
Next
Text7 = k
Next
Max = am(1, 1)
For i = 0 To n - 1
For j = 0 To m - 1
If am(i, j) > Max Then Max = am(i, j)
Next
Text8 = Max * l
Next
For i = 0 To n - 1
For j = 0 To m - 1
If i = j Then q = q * am(i, j)
Next
Text9 = q
Next
End Sub
Заключение
VERSION 5.00
Begin VB.Form Form5
Caption = "Маликво А.С., ЭМ-111, Вариант 24"
ClientHeight = 1425
ClientLeft = 120
ClientTop = 450
ClientWidth = 9885
LinkTopic = "Form5"
ScaleHeight = 1425
ScaleWidth = 9885
StartUpPosition = 3 'Windows Default
Begin VB.CommandButton Command1
Caption = "Вычислить"
Height = 375
Left = 4440
TabIndex = 4
Top = 720
Width = 5175
End
Begin VB.PictureBox Picture1
Height = 255
Left = 3600
ScaleHeight = 195
ScaleWidth = 555
TabIndex = 3
Top = 840
Width = 615
End
Begin VB.TextBox Text1
Height = 285
Left = 1320
TabIndex = 0
Top = 360
Width = 8295
End
Begin VB.Label Label2
Caption = "Количество элементов перед двоеточием"
Height = 255
Left = 120
TabIndex = 2
Top = 840
Width = 3255
End
Begin VB.Label Label1
Caption = "Строка"
Height = 255
Left = 120
TabIndex = 1
Top = 360
Width = 975
End
End
Attribute VB_Name = "Form5"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Dim str1 As String
Dim retval
Private Sub Command1_Click()
Picture1.Cls
str1 = Text1
retval = Split(str1, ":")
Picture1.Print Len(retval(0))
End Sub
Список литературы
1. Ананьев А., Федоров А. Самоучитель Visual Basic 6.0. BHV-Санкт-Петербург, 2008 г. 624 стр.
2. Культин Н. Visual Basic. Освой на примерах. БХВ – Петербург 2008 г., 284 стр.
3. Лукин С.Н. Visual Basic. Самоучитель для начинающих. Диалог-МИФИ, 2008 г., 544 стр.
4. Минасов Н.С., Тархов С.В. Методические указания по выполнению курсовой работы по дисциплине Информатика «Создание проектов решения вычислительных задач на Visual Basic для студентов очно-заочного отделения», Уфа 2012
| Тема: | «Создание проектов решения вычислительных задач на Visual Basic Вариант 24 с исходниками и пояснительной запиской» | |
| Раздел: | Информатика | |
| Тип: | Курсовая работа | |
| Страниц: | 13 | |
| Цена: | 900 руб. |
Закажите авторскую работу по вашему заданию.
- Цены ниже рыночных
- Удобный личный кабинет
- Необходимый уровень антиплагиата
- Прямое общение с исполнителем вашей работы
- Бесплатные доработки и консультации
- Минимальные сроки выполнения
Мы уже помогли 24535 студентам
Средний балл наших работ
- 4.89 из 5
написания вашей работы
У нас можно заказать
(Цены могут варьироваться от сложности и объема задания)
682 автора
помогают студентам
42 задания
за последние сутки
10 минут
время отклика
-
Курсовая работа:
16 страниц(ы)
Окно проекта 3
Задача №1 5
Задача №2 7
Задача №3 12
Задача №4 14
Список литературы 17
-
Дипломная работа:
73 страниц(ы)
ВВЕДЕНИЕ 3
ГЛАВА I. ТЕОРЕТИКО-МЕТОДОЛОГИЧЕСКОЕ ОСНОВАНИЕ МОДЕЛИРОВАНИЯ В СИСТЕМЕ НАЧАЛЬНОГО ОБРАЗОВАНИЯ 8
1.1. Философский смысл понятий "модель" и "моделирование" 81.2. Роль и место действия моделирования в стандарте нового поколения для начальной школы 17РазвернутьСвернуть
1.3. Уровни моделирования содержания текстовых задач на движение в начальной школе 23
Выводы по главе I 31
ГЛАВА II. ЭКСПЕРИМЕНТАЛЬНАЯ РАБОТА ПО МОДЕЛИРОВАНИЮ СОДЕРЖАНИЯ ТЕСТОВЫХ ЗАДАЧ НА ДВИЖЕНИЕ В НАЧАЛЬНОЙ ШКОЛЕ 33
2.1. Программа по обучению учащихся моделированию содержания текстовых задач на движение 33
2.2. Этапы и содержание экспериментальной работы по осуществлению программы 39
2.3. Подведение итогов опытной работы и разработка методических рекомендаций для учителей по моделированию текстовых задач 43
Выводы по главе II 46
ЗАКЛЮЧЕНИЕ 48
ЛИТЕРАТУРА 50
ГЛОССАРИЙ ПО КАТЕГОРИАЛЬНОМУ АППАРАТУ 54
ГЛОССАРИЙ ПО ПЕРСОНАЛИЯМ 55
ПРИЛОЖЕНИЕ 1 56
ПРИЛОЖЕНИЕ 2 65
-
Курсовая работа:
Аудит расчетов с покупателями и заказчиками
51 страниц(ы)
Введение.5
1 Теоретические вопросы аудита расчетов с покупателями и заказчиками.7
1.1 Цель и задачи аудиторской проверки учета расчетов с покупателями и заказчиками.71.2 Нормативное регулирование бухгалтерского учета расчетов с покупателями и заказчиками….….8РазвернутьСвернуть
1.3 Методика аудита расчетов с покупателями и заказчиками….….11
2 Учет и анализ расчетных операций с покупателями и заказчиками.14
2.1 Организационно-экономическая характеристика предприятия.14
2.2 Оценка постановки и ведения бухгалтерского учета с покупателями и заказчиками на предприятии….20
2.3 Оценка системы внутреннего контроля в организации….27
3 Аудит расчетных операций с покупателями и заказчиками….33
3.1 Расчет уровня существенности и аудиторского риска….33
3.2 Общий план и программа аудита….35
3.3 Описание техники выполнения аудиторских процедур….…39
3.4 Обобщение результатов аудита расчетов с покупателями и заказчиками…41
Заключение.47
Список использованных источников.49
Приложения.51
-
Реферат:
Проверка расчетов с поставщиками и подрядчиками при проведении аудита.
20 страниц(ы)
Введение 3
1 Цель, задачи, информационная база аудита расчетов с поставщиками и покупателями 4
2 Подготовка и планирование аудиторской проверки 73 Оценка системы внутреннего контроля расчетов с поставщиками и покупателями 12РазвернутьСвернуть
4 Аудит состояния расчетов с поставщиками подрядчиками 16
Заключение 19
Список использованной литературы 20
-
Дипломная работа:
Изучение текстовых задач на уроках математики в начальных классах
87 страниц(ы)
ВВЕДЕНИЕ…. 3
ГЛАВА I. ТЕОРЕТИКО-МЕТОДОЛОГИЧЕСКОЕ ОСНОВАНИЕ ИЗУЧЕНИЯ ТЕКСТОВЫХ ЗАДАЧ НА УРОКАХ МАТЕМАТИКИ В НАЧАЛЬНОЙ ШКОЛЕ.1.1.Роль и место текстовых задач в содержании в курсе математики в начальной школе…7РазвернутьСвернуть
1.2. Подходы к изучению текстовых задач в различных методических системах…. 17
1.3. Методическая система изучения текстовых задач в учебно-методическом комплексе «Школа России»….23
ГЛАВА II. ОПЫТНО-ПЕДАГОГИЧЕСКАЯ РАБОТА ПО ИЗУЧЕНИЮ ТЕКСТОВЫХ ЗАДАЧ ПРИ ИЗУЧЕНИИ КУРСА МАТЕМАТИКИ В НАЧАЛЬНОЙ ШКОЛЕ.
2.1. Инновационный проект по изучению текстовых задач в 4 классе основанное на УМК «Школа России»…40
2.2. Этапы и содержания опытно-экспериментальной работы по использованию современных подходов к изучению текстовых задач…. ….46
2.3. Подведение итогов опытной работы и разработка методических рекомендаций для учителей начальных классов…72
ЗАКЛЮЧЕНИЕ….78
ЛИТЕРАТУРА ….81
-
Дипломная работа:
Обучение решению олимпиадных задач, как метод развивающий обобщенные задачные умения
37 страниц(ы)
Введение. 3
Глава 1 5
§ 1 Исторический обзор возникновения физической олимпиады. 5
§2 Типы соревновательных конкурсов по физике для школьников. 92.1 Всероссийская олимпиада. 9РазвернутьСвернуть
2.2 Российская олимпиада «Турнир юных физиков». 10
2.3 Российская научно социальная программа «шаг в будущее» 12
Глава2 14
§1 О задачах. 14
§2. Методы решения физических задач. 19
Первая часть ознакомление с содержанием задачи. 23
Вторая часть – составление и реализация плана решения. 24
Третья часть – изучение результатов решения задачи. 26
§3. Факторы и критерии отбора задач выносимых на олимпиаду. 27
Следующая работа
Новые формы конкуренции в современной экономике