Информатика и выч. техника \ Информатика

Основы языка программирования Visual Basic: Учебное пособие, страница 13

Схема  алгоритма структуры  Цикл с постусловием  приведена на рис. 16. Характерной особенностью этого типа циклических процессов служит то, что при задании параметру цикла значения х0 > xк, тело цикла будет обязательно выполнено один раз.

 


Структуру Цикл с постусловием можно реализовать с помощью следующих операторов.

1. Do                                           2. Do

       операторы                                 операторы

Loop While условиеLoop Until условие

Следует обратить внимание, что перед записью операторов параметру цикла необходимо присвоить начальное значение, а последний оператор тела цикла, должен увеличивать (уменьшать) значение параметра цикла на величину шага.

Пример 5.

Разработать информационную технологию, позволяющую вычислить  значение функции  при изменении значения –1,2£s£1,2 с шагом Ds = 0,2.

Входные данные: данных, подлежащих вводу, нет

Выходные данные: s, g - вещественного типа

Private Sub Form_Activate()

Dim s As Double, g As Double

Cls                                ’ Очистка формы

CurrentY = 500

Print Tab(20), "Значение s", "Значение g"

Print Tab(20), "_______________________"

s = –1.2

Do

    g = (1 + Exp(3 * s)) ^ (1 / 4)

    Print Tab(20), Format(s, "0.0"), _

Format(g, "0.0000")

     s = s + 0.2

Loop Until  s > 1.2

End Sub
 
Ниже представлена схема алгоритма, программа и выходная форма решения задачи.
 
 


10.3.3. Структура Цикл в Цикле

При реализации структуры Цикл в Цикле вводятся следующие понятия:

– параметр внешнего цикла (х);

– параметр внутреннего цикла (z);

– начальное значение параметра внешнего цикла (х0);

– начальное значение параметра внутреннего цикла (z0);

– конечное значение параметра внешнего цикла (хк);

– конечное значение параметра внутреннего цикла (zк);

– шаг изменения параметра внешнего цикла (Dх);

– шаг изменения параметра внутреннего цикла (Dz);

– условие окончания внешнего цикла;

–  условие окончания внутреннего цикла.

Эта структура организуется по тому же принципу, что и структура Цикл. Схема  алгоритма приводится на рис. 17. Телом внешнего цикла служат блоки 3 – 6.

Рис. 17

Пример 6.

Пусть требуется вычислить значение функции y = sin x + cos z при изменении 0 £ x £ 2, где Dx = 0,4, а 1 £ z £ 2 с шагом Dz = 0,5.

Входные данные: данных, подлежащих вводу, нет

Выходные данные: x, z, y - вещественного типа

Схема алгоритма:

 


Подпись: Private Sub Form_Activate() Dim x As Double, y As Double, z As Double Cls For x = 0 To 2 Step 0.4 Print Spc(8);"x="; x z = 1 Do y = Sin(x) + Cos(z) Print "z="; Format(z, "0.0"), "y="; Format(y, "0.00") z = z + 0.5 Loop While z <= 2 Next End Sub

Программа этого примера и выходная форма имеют вид:

В приведенном примере реализуется внешний цикл с предусловием. Телом внешнего цикла является внутренний цикл с постусловием, т.е. внутренний цикл выполняется хотя бы один раз.

Рассмотренные структуры используются и при разработке более сложных информационных технологий, в которых требуется обработать данные, сформированные в массивы или базы данных.


Библиографический список

1. Андерсон Т. Visual Basic шаг за шагом. – М.: ЗАО Изд-во Бином, 1998.

2. БраунС. Visual Basic 6. Учебный курс. - СПб., 1999.

3. РайтингерМ., МучГ. Visual Basic 6.0. Библиотека студента. Киев; "Ирина", BHV, 2000.

4. Ананьев А., Федоров А. Самоучитель Visual Basic 6.0. - СПб, БХВ-Петербург, 2005.

Содержание

Введение. 3

1. Загрузка системы программирования Visual Basic. 4

2. Интегрированная среда разработки (IDE) 6

3. Последовательность разработки проекта. 11

4. Сохранение проекта. 13

5. Основные элементы управления. 13

5.1. Надпись (Label) 13

5.2. Текстовое поле (TextBox) 14

5.3. Кнопка (CommandButton) 15

5.4. Окно списка (ListBox) 16

6. Последовательность разработки Информационной  Технологии. 17

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

6.2. Разработка математической модели. 17

6.3. Составление схемы алгоритма. 18

6.4. Разработка проекта. 18

6.5. Сохранение проекта. 21

6.6. Выполнение проекта. 21

6.7. Отладка программы.. 22

7. Основы языка программирования Visual Basic. 22

7.1. Основные понятия. 22

7.2. Типы данных. 22

7.3. Объявление данных. 23

7.3.2. Объявление переменных. 24

7.4. Оператор присваивания. 25

7.5. Встроенные функции Visual Basic. 26

7.5.1. Арифметические функции. 26

7.5.2. Тригонометрические функции. 27

7.5.3. Функции работы со строками. 28

8. Организация ввода данных. 29

8.1. Функция InputBox(). 29

8.2. Ввод данных с помощью текстового поля. 30

9. Организация вывода данных. 30

9.1. Оператор MsgBox. 30

9.2. Функция MsgBox(). 31

9.3. Метод PRINT. 33

9.4. Вывод данных с помощью текстового поля. 33

10. Структурное программирование. 34

10.1. Структура Следование. 34

10.2. Структура Развилка. 34

10.2.1. Классическая структура Развилка. 34

10.2.2. Модифицированная структура Развилка. 37

10.2.3. Вложенная структура Развилка. 38

10.2.4. Функция IIF. 40

10.2.5. Оператор  Select Case …. End Select 43

10.2.6. Оператор безусловного перехода. 46

10.3. Структура Цикл. 46

10.3.1. Цикл с предусловием.. 47

10.3.2. Цикл с постусловием.. 50

10.3.3. Структура Цикл в Цикле. 52


Учебное издание

Байдина Наталия Владимировна

Костянко Наталья Федоровна

ОСНОВЫ ЯЗЫКА ПРОГРАММИРОВАНИЯ

VISUAL BASIC

Учебное пособие

по дисциплине "Информатика"

для студентов заочной формы обучения всех специальностей

Публикуется в авторской правке

Компьютерная верстка Байдина Н.В.

 Подписано в печать с оригинал-макета

Формат 60´84 1/16. Бумага для множ. апп. Печать офсетная.

Усл. печ. л.          Уч.-изд. л.           Тираж           экз.

Петербургский государственный университет путей сообщения.

190031, СПб., Московский пр., 9.

Скачать файл