Private Sub Command1_Click ().
Dim i, j, 5, 5 As Integer.
Dim s As Double.
Dim c (1 To 50, 1 To 50) As Double.
For i = 1 To 5.
For j = 1 To 5.
c (i, j) = 7 * i — j.
Next.
Next.
s = 0.
For i = 1 To 5.
For j = 1 To 5.
If 5= 5 Then s = s + c (i, i) Else s = s + c (i, j).
Next.
Next.
Print s.
End Sub.
Private Sub Form_Load ().
End Sub.
Заключение
В курсовой работе решены задачи по определению мощности двигателя автомобиля, вычислению функции, нахождению корней уравнения, вычислению определённого интеграла и решению матрицы.
Разработаны алгоритмы решения поставленных задач, составлены программы на языке С++., реализующие указанные алгоритмы. С её помощью проведены расчёты, проанализированы полученные результаты. Анализ результатов показал, что поставленные задачи успешно решены.
Список литературы
- 1. Информатика: Базовый курс. / С. В. Симонович и др. СПб.: Питер, 2005.
- 2. Острейковский В. А. Информатика: Учеб. для вузов. М.: Высш. шк., 2000. 511 с.: ил.
- 3. Алексеев Е. В. и др. Вычислительная техника и программирование. Практикум по программированию: Практ. пособие / В. Е. Алексеев, А. С. Ваулин, Г. Б. Петрова; Под ред. А. В. Петрова. М.: Высш. шк., 1991. 400 с.: ил.
- 4. Глушаков С. В., Мельников И. В. Персональный компьютер: Учебный курс / Худож. оформитель А. С. Юхтман. Харьков: Фолио; М.: ООО «Издательство АСТ», 2001. 520 с. (Домашняя б-ка).
- 5. Леонтьев В. Новейшая энциклопедия персонального компьютера. М.: ОЛМА-ПРЕСС, 1999. 640 с.
- 6. Козлов В. В., Можаева Н. А., Зуева Н. Г. Информатика. Алгоритмизация и программирование. Мет. Указания и задания к курсовой работе, 2006. 32 с.