РГР и Лабы разных вариантов (Word РГР№3)

Посмотреть архив целиком

РАСЧЕТНО-ГРАФИЧЕСКАЯ РАБОТА №3

Программирование алгоритмов циклической структуры с заданным числом повторений.

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

Составить алгоритм и программу для вычисления значения функции Y при заданном значение аргумента X и законе изменения аргумента. Вывести эту форму в окна списков (ListBox) значения аргумента и функции. Для программирования циклов использовать оператор цикла с условием Do... Loop.

2.Математическая модель

y = b * Sin(x) + a * x ^ 2 + b

3.Создание формы





5.Програмный код

Option Explicit

Dim a As Single, b As Single, x As Single, y As Single

Private Sub Command1_Click()

a = Val(InputBox("a=", "Ввод данных"))

b = Val(InputBox("b=", "Ввод данных "))

For x = -3.14 To 3.14 Step 3.14 / 5

y = b * Sin(x) + a * x ^ 2 + b

List1.AddItem "x=" + Str(x) + " " + "y=" + Str(y)

Next x

End Sub

Private Sub Command2_Click()

End

End Sub



4.Блок- схема

Начало

Ввод a,b

X=-

y = b * Sin(x) + a * x ^ 2 + b



Добавляем в ListBox x,y

Конец




Случайные файлы

Файл
105891.rtf
23006.rtf
78142.doc
8796.rtf
87928.doc




Чтобы не видеть здесь видео-рекламу достаточно стать зарегистрированным пользователем.
Чтобы не видеть никакую рекламу на сайте, нужно стать VIP-пользователем.
Это можно сделать совершенно бесплатно. Читайте подробности тут.