Пример выполнения задачи № 1 «Сумма ряда»
Постановка задачи
Вычислить значение суммы ряда S. Сравнить полученное значение с точным решением Y, вычислив абсолютную и относительную погрешности.
S=\sum\limits_{k=2}^n\frac{x^k}{k!};\
Y=\frac{e^x-e^{-x}}{1+\frac{1}{3}}-1
Схема алгоритма
Рисунок 3. Схема алгоритма
Исходный текст программы
Private Sub Command1_Click()
Picture1.Cls
Picture2.Cls
Picture3.Cls
Picture4.Cls
n = Val(Text1)
x = Val(Text2)
s = 0
f = 1
For k = 2 To n
f = f * k
s = s + x ^ k / f
Next
Picture1.Print Format(s, "0.000000")
Y = (Exp(x) - Exp(-x)) / (1 + 1 / 3) - 1
Picture2.Print Format(Y, "0.00000")
A = Y - s
Picture3.Print Format(A, "0.000000000")
D = A / Y * 100
Picture4.Print Format(D, "0.00000000")
End Sub
Private Sub command2_click()
Task2.Show
End Sub
Private Sub Command3_click()
Form1.Show
End Sub
Private Sub Command4_Click()
End
End Sub
Экранная форма программы с примером решения задачи
Рисунок 4. Экранная форма программы
косметическая чистка лица
Пользователь, раз уж ты добрался до этой строки, ты нашёл тут что-то интересное или полезное для себя. Надеюсь, ты просматривал сайт в браузере Firefox, который один правильно отражает формулы, встречающиеся на страницах. Если тебе понравился контент, помоги сайту материально. Отключи, пожалуйста, блокираторы рекламы и нажми на пару баннеров вверху страницы. Это тебе ничего не будет стоить, увидишь ты только то, что уже искал или ищешь, а сайту ты поможешь оставаться на плаву.