«Создание проектов решения вычислительных задач на Visual Basic Вариант 5 с исходниками и пояснительной запиской»

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

Рис. 1. Титульный лист работы

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

Листинг процедур главного окна приложения

Private Sub Command1_Click()

Form6.Show

End Sub

Private Sub Command2_Click()

Form2.Show

End Sub

Private Sub Command3_Click()

Form3.Show

End Sub

Private Sub Command4_Click()

Form4.Show

End Sub

Private Sub Command5_Click()

End

End Sub

Задача №1

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

Для заданного числового ряда найти:

а) сумму членов числового ряда при заранее известном их количестве;

б) точное значение суммы членов числового ряда, вычисленное по заданной формуле;

в) погрешности вычисления суммы членов числового ряда (абсолютную и относительную) по отношению к точному значению суммы членов

числового ряда.

, точное значение .

На рисунке 1 представлена блок – схема программы.

Рис. 3 Блок-схема

Листинг программы

Private Sub Command1_Click()

s = 0

p = 1

n = Val(Text1)

For i = 1 To n

a = 1 / (i ^ 2)

s = s + (-1) ^ (i + 1) / i ^ 2