- •Н. Н. Пустовалова компьютерные информационные технологии лабораторный практикум
- •Лабораторная работа № 1. Операционная система Windows. Программы группы «Стандартные»
- •Лабораторная работа № 2. Приложение Microsoft Word Задание 1
- •Задание 2
- •Программирование циклических процессов
- •Лабораторная работа № 3. Приложение Microsoft Excel Задание 1
- •Зарплата работников за январь
- •Задание 2
- •Лабораторная работа № 4. Реализация алгоритмов линейной структуры в приложении Excel Задание 1
- •Задание 2
- •Лабораторная работа № 5. Циклы в инженерных расчетах
- •Лабораторная работа № 6. Разветвляющиеся программы в приложении Excel
- •Лабораторная работа № 7. Одномерные массивы
- •Лабораторная работа № 8. Использование подпрограмм
- •Лабораторная работа № 9. Создание форм пользователя в приложении Excel
- •Лабораторная работа № 10. Простые и комбинированные списки
- •Лабораторная работа № 11. Разработка проекта с использованием форм в приложении Excel Задание 1
- •Задание 2
- •Лабораторная работа № 12. Создание баз данных в приложении Access Задание 1
- •Задание 2
- •Задание 3
- •Лабораторная работа № 13. Разработка презентации в PowerPoint
- •Задание 3
- •Лабораторная работа № 15. Графический редактор Adobe Photoshop Задание 1
- •Задание 2
- •Лабораторная работа № 16. Приложение Machcad Задание 1
- •Лабораторная работа № 17. Приближенное вычисление интегралов
- •Лабораторная работа № 18. Приближенное решение уравнений
- •Лабораторная работа № 19. Решение систем уравнений в приложениях Excel и Machcad
- •Лабораторная работа № 20. Математические модели одномерных процессов
- •Лабораторная работа № 21. Оптимизация процессов
- •Лабораторная работа № 22. Решение дифференциальных уравнений
- •Лабораторная работа № 23. Компьютерная графика. Приложение Macromedia Flash Задание 1
- •Задание 2
- •Лабораторная работа № 24. Создание html-документов в сети Интернет
- •Операционная система windows
- •Программы группы «стандартные»
- •Приложение microsoft word
- •Приложение microsoft excel
- •Линейные программы в приложении excel
- •Циклические программы
- •Разветвляющиеся программы
- •Одномерные массивы
- •Использование подпрограмм
- •Формы пользователя
- •Работа со списками
- •Использование мастера слияния
- •Базы данных
- •Создание таблиц
- •Заполнение, сохранение и редактирование данных в таблице. Порядок заполнения таблиц зависит от связей в таблицах. Вначале заполняются таблицы главные, затем – подчиненные.
- •Итоговый запрос. Чтобы подводить итоговые значения по группам данных, используются итоговые запросы. Например, пусть надо получить итоговые суммы по продажам отдельных групп товаров.
- •Создание форм
- •Разработка отчетов
- •Приложение power point
- •Компьютерная графика. Приложение ms visio
- •Выделение областей. Для выделения всего рисунка или слоя служит команда Select / All (Выделение / Все).
- •Приложение mathcad
- •Вычисление определенных интегралов
- •Согласно методу трапеций значение интеграла определяется по формуле
- •Приближенное решение уравнений
- •Решение систем линейных уравнений
- •Рассмотрим алгоритм решения системы линейных уравнений методом Гаусса.
- •Получение математической модели одномерного объекта
- •Решение задач оптимизации
- •Приближенное решение дифференциальных уравнений
- •Приложение macromedia flash
- •Создание html-документов
- •Компьютерные информационные технологии
Циклические программы
Если в программе надо повторить один оператор или последовательность операторов несколько раз, используются операторы циклов. Операторы циклов заключают такой оператор или группу операторов между ключевыми словами For ... Next или Do ... Loop и определяют условия повтора.
Циклы For…Next используются, когда заранее определено, сколько раз должны выполняться операторы, составляющие тело цикла и заключенные между For и Next. В операторе For задается начальное значение параметра цикла, конечное значение и шаг приращения (Step). Когда Step отсутствует, то приращение равно единице.
Рассмотрим примеры использования For...Next
-
Вывод значений функции Sin(x) на интервале от 0 до 1 с приращением значения аргумента 0.1 в окна сообщений
Вывод значений функции Sin(x) в первый столбец, начиная с первой строки на рабочем листе с именем Лист1
For x = 0 To 1 Step 0.1
Y=Sin(x)
MsgBox (y)
Next
i = 1
For x = 0 To 1 Step 0.1
Y= Sin(x)
Worksheets(“Лист1”).Cells(i, 1) = y
i = i + 1
Next
В этих программах параметром цикла является переменная х. Операторы цикла выполняются 11 раз, соответственно должно получиться 11 ответов для всех значений х.
Циклы типа Do...Loop используются тогда, когда неизвестно, сколько раз должно быть повторено выполнение группы операторов. Существуют 4 варианта Do...Loop.
-
Условие проверяется до того, как выполнятся операторы цикла
Условие проверяется после того, как выполнятся операторы цикла
Условие проверяется до того, как выполнятся операторы цикла
Условие проверяется после того, как выполнятся операторы цикла
Do While<условие>
<операторы >
Loop
Do
<операторы>
Loop While<условие>
Do Until<условие>
<операторы>
Loop
Do
<операторы>
Loop Until<условие>
Цикл с ключевым словом While продолжает свою работу, пока условие остается истинным, т. е. выполняется. Цикл с ключевым словом Until продолжает свою работу, пока условие является ложным, т. е. условие не выполняется.
Рассмотрим примеры.
-
Заполнить первый столбец результатами вычислений по формулепри z = {1; 4; 7,5; 9; 15}.
Вычислить значения tпо формуле: t = sin2(x) + e3−x,
x = 3(0,1)4 (х меняется от 3 до 4 с шагом 0,1).
Sub CommandButton1_Click()
For i = 1 To 5
z = Val(InputBox("Введите значениеz"))
q = Sqr(z ^ 2 + 5 * z) * Log(z + 0.33)
Worksheets(“Лист1”).Cells (i, 1) = q
Next
End Sub
Sub CommandButton1_Click()
x = 3 : n = 1
Do While x <= 4
t = Sin(x) ^ 2 + Exp(3 – x)
Worksheets(“Лист1”).Cells (1, n) = t
x = x + 0.1 : n = n + 1
Loop
End Sub
Назад