ЗАВДАННЯ 9.2, 9.3. СТВОРІТЬ ПРОЕКТ ДЛЯ ОБЧИСЛЕННЯ ЗНАЧЕННЯ ФУНКЦІЇ ЗГІДНО З ВАРІАНТОМ ІНДИВІДУАЛЬНОГО ЗАВДАННЯ.

Приклад виконання ЗАВДАННЯ 9.2:

СТВОРІТЬ ПРОЕКТ ДЛЯ ОБЧИСЛЕННЯ ТА ВИВЕДЕННЯ ЗНАЧЕНЬ ФУНКЦІЇ де aÎ[2;5], h_a=1.5 bÎ[3; 9], h_b=2 cÎ[0;1.2], h_c=0.3

Результат. Вивести на формі.

Обов'язкові умови. Розрахунки і виведення даних повинні виконуватися при натисканні відповідної кнопки.

Порядок виконання роботи

1. Створіть новий проект, на якому розташуйте форму, аналогічну відповідній проекту Лр9_Зад1_Прізвище.

2. Змініть назву кнопки CmdPrint на CmdРозрахунок.

3. Розробіть процедуру обробки події Click для CmdРозрахунок відповідно схемі рис. 9.2, аналогічно наведеній нижче.

Option Explicit

Private Sub CmdРозрахунок_Click()

Dim a As Single, b As Single, c As Single, y As Single

Print: Print: Print: Print

Print "a"; Spc(7); "b"; Spc(7); "c"; Spc(7); "y"

Print

For a = 2 To 6 Step 1.5

For b = 3 To 9 Step 2

For c = 0.1 To 1.3 Step 0.3

y = (a + b + c)

<== попередня сторінка	\|	наступна сторінка ==>
Dim file As String	\|	Print a; Spc(5); b; Spc(5); c; Spc(5); y

Не знайшли потрібну інформацію? Скористайтесь пошуком google:

Генерація сторінки за: 0.003 сек.