Вычислить значение функции - Visual Basic .NET (63891)

Узнай цену своей работы

Формулировка задачи:

Добрый вечер, помогите пожалуйста написать программу как приложение Windows Forms задание:

Составить и отладить процедуру вычисления заданной (во вложении) функции y(x) для каждого из заданных значений параметра a и при всех заданных значениях аргумента x.Во вложении формула и данные для решения.

Вот что у меня есть, это кусочек программы, ее результаты выводились в ексель и я не понимаю как мне заменить Cells, и как сделать ввод и вывод данных.
Листинг программы
  1. Imports System.Math
  2. Public Class Form1
  3. Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
  4. Const pi = 3.14
  5. Dim x, y, a, n, k As Single
  6. k = 2
  7. For a = 0 To 2 Step 0.5
  8. Cells(3, k) = a
  9. n = 4
  10. For x = 0 To pi Step pi / 36
  11. If a = 0 Then Cells(n, 1) = x
  12. y = Exp(-x * a) * Sin(x)
  13. Cells(n, k) = y
  14. n = n + 1
  15. Next x
  16. k = k + 1
  17. Next a
  18. End Sub
  19. End Class

Решение задачи: «Вычислить значение функции»

textual
Листинг программы
  1. Imports System.Math
  2. Public Class Form2
  3.     Private Sub Form2_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
  4.         DataGridView1.ColumnCount = 6
  5.         DataGridView1.RowCount = 100
  6.     End Sub
  7.     Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
  8.         Const pi = Math.PI
  9.         Dim x, y, a As Single
  10.         Dim k, n As Integer
  11.         k = 1
  12.         DataGridView1(0, 0).Value = "a="
  13.         For a = 0 To 2 Step 0.5
  14.             DataGridView1(k, 0).Value = a
  15.             n = 1
  16.             For x = 0 To pi Step pi / 36
  17.                 If a = 0 Then DataGridView1(0, n).Value = x
  18.                 y = Exp(-x * a) * Sin(x)
  19.                 DataGridView1(k, n).Value = y
  20.                 n = n + 1
  21.             Next x
  22.             k = k + 1
  23.         Next a
  24.     End Sub
  25. End Class

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

8   голосов , оценка 4.25 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы