Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Копия Лабораторна робота_VB_6_1_5_ЕТ_ЕСК_студен...doc
Скачиваний:
0
Добавлен:
01.04.2025
Размер:
1.21 Mб
Скачать

4 Этап – тестирование программы:

  1. запустите программу на выполнение, введите исходные данные, проверьте правильность расчетов (рис.5).

  2. изменяя поочередно исходные данные и ограничитель получите результат и проанализируйте его.

  3. сохранить работу

COMP 25 D:\ HOME/ DOS/ QBASIC/ m08big61.bas

Програмні помилки:

- відсутність оператору виходу з циклу If Abs(vr) <= ogr Then Exit Do призвела до зациклювання програми

Задание2. Задача 2. Обчислити суму елементів ряду , що схдиться, із заданою точністю ( ) та обчислити кількість елементів цього ряду. Ввод исходных переменных величин и вывод елементов ряда организовать с помощью ТextBox. Ввод постоянных величин и вывод накопителей организовать с помощью Label. Для решения задачи используйте:

Варианти 1,5,9,13,17,21,25. Цикл с предусловием - оператор DO LOOP While.

Варианти 2,6,10,14,18,22. Цикл с постусловием - оператор DO LOOP While.

Варианти 3,7,11,15,19,23. Цикл с предусловием - оператор DO LOOP Untile .

Варианти 4,8,12,16,20,24. Цикл спостусловием - оператор DO LOOP Untile .

Задание 3.

Ітераційні цикли

1

Скласти схему алгоритму та програму:

обчислить значення

з точністю =5; х=0,3

та надрукувати число елементів, що увійшли до суми

Ітераційні цикли

2

Скласти схему алгоритму та програму:

обчислить значення

з точністю х=0,17

та надрукувати число елементів, що увійшли до суми

Ітераційні цикли

3

Скласти схему алгоритму та програму:

обчислить значення

з точністю х=1,2

та надрукувати кожний елемент, що увійшов до суми

Ітераційні цикли

4

Скласти схему алгоритму та програму:

обчислить значення

з точністю х=0,12

та надрукувати значення останнього елементу, що увійшов до суми

Ітераційні цикли

5

Скласти схему алгоритму та програму:

обчислить значення

з точністю =0,4; х=32,1

та надрукувати число елементів, що увійшли до суми

Ітераційні цикли

6

Скласти схему алгоритму та програму:

обчислить значення

з точністю х=0,2

та надрукувати число елементів, що увійшли до суми

Ітераційні цикли

7

Скласти схему алгоритму та програму:

обчислить значення a

з точністю =4; х=0,5

та надрукувати число елементів, що увійшли до суми

Ітераційні цикли

8

Скласти схему алгоритму та програму:

обчислить значення

з точністю х=0,2

та надрукувати число елементів, що увійшли до суми

Ітераційні цикли

9

Скласти схему алгоритму та програму:

обчислить значення

з точністю х=1,5

та надрукувати кожний елемент, що увійшов до суми

Ітераційні цикли

10

Скласти схему алгоритму та програму:

обчислить значення .

з точністю х=0,3

та надрукувати значення останнього елементу, що увійшов до суми

Ітераційні цикли

11

Скласти схему алгоритму та програму:

обчислить значення S=

з точністю х=2,5

та надрукувати число елементів, що увійшли до суми

Ітераційні цикли

12

Скласти схему алгоритму та програму:

обчислить значення ,

з точністю х=0,17

та надрукувати число елементів, що увійшли до суми

Ітераційні цикли

13

Скласти схему алгоритму та програму:

обчислить значення

з точністю х=1,3

та надрукувати число елементів, що увійшли до суми

Ітераційні цикли

14

Скласти схему алгоритму та програму:

обчислить значення e=1+

з точністю х=0,17

та надрукувати число елементів, що увійшли до суми

Ітераційні цикли

15

Скласти схему алгоритму та програму:

обчислить значення shx=x+

з точністю х=0,21

та надрукувати кожний елемент, що увійшов до суми

ЛАБОРАТОРНАЯ РАБОТА №6. ПРОЕКТИРОВАНИЕ ПРИЛОЖЕНИЙ VB6, ПРИ РЕШЕНИИ ЗАДАЧ ОБРАБОТКИ МАССИВОВ.

Массив – проименованная упорядоченная совокупность однотипных данных, имеющая размер и размерность (одномерный двумерный массив). Переменной соответствует одна ячейка памяти, массиву – нескольких ячеек памяти.

Например:

i

1

2

3

4

5

6

7

8

9

10

11

Fam(і)

Петров

Иванов

Сидоров

Котов

Кротов

Андреев

Титов

Львов

Смирнов

Лунин

Мамин

М1

100

20

56

90

87

55

60

75

77

68

74

Имя массива – Fam; индекс (номер) элемента в массиве – i;однотипные строковые величины – фамилии Петров, Иванов, Сидоров… При обращении к элементу массива указывается имя массива и в скобках его индекс.

Например:

Fam (2) = «Иванов»

Fam (7) = «Титов»

Массивы, которые содержат строго определенное количество элементов, называются массивами c фиксированной границей. Массивы, которые содержат переменное количество элементов (массивы, размеры которых могут изменяться в процессе выполнения программы), называются динамическими.

ДЕЙСТВИЯ С МАССИВАМИ:

Іаобъявление массива c фиксированной границей; Массивы объявляются так же, как обычные скалярные переменные. Если массив объявлен локальным, его можно использовать только в той процедуре, в которой он объявлен. Если массив объявлен как глобальный в стандартном модуле, он может быть использован в любом месте в программы. При объявлении массива необходимо определить:

  • Имя массивадля имен массивов применяются те же правила, что и для имен скалярных переменных;

  • Тип хранимых данных;

  • Размерность – количество измерений массива;

  • Размерпо умолчанию первый элемент массива имеет индекс 0 (ноль).

Например:

Public Fam (1 To 11) As String

Dim B(1 To 4,1 To 3) As Single

Dim Count(х)

Часто начальное значение индекса не указывается, тогда оно (по умолчанию) принимается равным 0, ключевое слово To при этом не используется. Конечное значение индекса должно быть указано обязательно. Добавив до бявления оператор Option Base 1 можно заменить индекс первого элемента каждого массива на 1 вместо 0. Допускаются отрицательные значения индексов.

Ібобъявление динамического массива:

1) объявляется масив как обычные скалярные переменные, но список размерности массива остается пустым, например:

Dim Count () As Integer

2) с помощью оператора ReDim указывается размерность массива в виде числа или выражения. Синтаксис оператора ReDim аналогичен синтаксису оператора объявления массива фиксированного размера. Например, размерность массива может быть задана любым из следующих способов:

ReDim Count (х)

ReDim Count (20)

ReDim Count (1 То 20)

При выполнении оператора ReDim данные, размещенные в массиве ранее, теряются. Это удобно в том случае, если данные больше не нужны и требуется переопределить размерность массива и подготовить его для размещения новых данных. Если хотите изменить размер массива, не потеряв при этом данных, необходимо воспользоваться оператором ReDim с ключевым словом Preserve. Например, приведенный ниже программный код увеличивает размер массива на единицу без потери хранящихся в массиве данных:

ReDim Preserve Count (х + 1)

ІІ – заполнение массива; Массив можно заполнить случайными числами, вводом с клавиатуры с помощью окна InputBox, данными из файла и др.

О кно списка (ListBox ) позволяет хранить не одно значение, а список значений. Элементы списка имеют индекс. Минимальный индекс равен 0. Значения в списке имеют тип String. Важным свойством объекта является свойство ListIndex. После того как пользователь щелкнет на пункте списка, свойство ListIndex возвращает число, которое соответствует позиции пункта в списке (индексу).

Комбинированное окно (ComboBox ) представляет собой объединение двух полей окна списка и текстового поля. Комбинированное окно аналогично Окну списка, но занимает меньше места. Окно имеет свойство Style. Значение свойства 0 делает список невидимым (его можно увидеть, щелкнув по кнопке раскрытия списка). Свойство ListIndex аналогично этому же свойству Окна списков.

Задание 1. Задача 1. ЗАПОЛНИТЕ МАССИВ ДВУМЯ СПОСОБАМИ:

1 - СЛУЧАЙНЫМИ ЦЕЛЫМИ ЧИСЛАМИ В ДИАПАЗОНЕ ОТ 0 ДО100;

2 - ПУТЕМ ВВОДА ЧИСЕЛ С КЛАВИАТУРЫ (НЕ ОБЯЗАТЕЛЬНО ЦЕЛЫХ).