- •Введение
- •Структура программы на vbScript
- •Переменные
- •Подтипы данных и функции преобразования типов
- •Константы
- •Встроенная функция вывода данных MsgBox
- •Встроенная функция ввода данных InputBox
- •Комментарии
- •Непрерывные строки
- •Операторы и операции
- •Пример 4
- •Пример 5
- •Пример 6
- •Пример 7
- •Пример 8
- •Пример 9
- •1.4 Задачи для самостоятельного решения
- •Логические операции
- •Оператор условного перехода: If … Then
- •2.3 Демонстрационные примеры Пример 1
- •Пример 2
- •Пример 3
- •Пример 4
- •Пример 5
- •Пример 6
- •Пример 7
- •2.4 Задачи для самостоятельного решения
- •Лабораторная работа 3. Операторы цикла в программах на vbscript
- •3.1 Цель работы
- •3.2 Теоретические сведения
- •For…Next (цикл со счетчиком)
- •Как выбрать, какой из циклов использовать в программе?
- •Пример 10
- •Пример 11
- •Пример 12
- •Пример 13
- •Пример 14
- •Пример 15
- •Пример 16
- •3.4 Задачи для самостоятельного решения
- •Передача параметров с помощью ключевых слов ByVal и ByRef
- •Функции
- •Пример 4
- •Пример 5
- •4.4 Задачи для самостоятельного решения
- •Лабораторная работа 5. Программирование алгоритмов при помощи рекурсивных процедур и функций
- •5.1 Цель работы
- •5.2 Теоретические сведения
- •5.3 Демонстрационные примеры Пример 1
- •Пример 2
- •Пример 3
- •Пример 4
- •5.4 Задачи для самостоятельного решения
- •Лабораторная работа 6. Массивы
- •6.1 Цель работы
- •6.2 Теоретические сведения
- •Перебор элементов массива
- •6.3 Демонстрационные примеры Пример 1
- •Пример 2
- •Пример 3
- •Пример 4
- •Пример 5
- •Пример 6
- •Пример 7
- •Пример 8
- •6.4 Задачи для самостоятельного решения "Заполнение" массивов
- •Массивы. Исследование и поиск
- •Модификация массивов
- •Лабораторная работа 7. Алгоритмы поиска в регулярном типе данных. Простейшие классические алгоритмы. Сортировка в массиве
- •7.1 Цель работы
- •7.2 Теоретические сведения
- •Сортировка обменом
- •Сортировка выбором
- •Сортировка включениями
- •Сортировка бинарными включениями
- •Шейкер-сортировка
- •7.3 Демонстрационные примеры Пример 1
- •Пример 2
- •Пример 3
- •Пример 4
- •Пример 5
- •Пример 6
- •Пример 7
- •Пример 8
- •Пример 9
- •Пример 10
- •7.4 Задачи для самостоятельного решения
- •Лабораторная работа 8. Строковый тип данных в программах на vbscript
- •8.1 Цель работы
- •8.2 Теоретические сведения
- •Другие функции необходимые для работы со строками
- •Основные функции для работы с датой и временем:
- •8.3 Демонстрационные примеры Пример 1
- •Пример 2
- •Пример 3
- •Пример 4
- •Пример 5
- •Пример 6
- •Пример 7
- •Пример 8
- •Пример 9
- •8.4 Задачи для самостоятельного решения Модификаторы
- •“Вычеркиватели” (частный случай модификаторов)
- •Наблюдатели (предикаты)
- •Подсчет
- •Поиск в словах
- •Литература
- •Данчул а.Н. Информатика: Учебник. – м.: рагс , 2004 г. - 528 с.
- •Содержание
Пример 4
'Имя файла Integer.vbs
'Программа вычисляет сумму, разность, произведение, частное и остаток от 'деления двух введённых чисел типа Integer.
option explicit 'запрет на использование необъявленных переменных
dim n,m 'две рабочие переменные
' вводим переменные
n=Inputbox("Введите целочисленное значение переменной n:",_
"Окно ввода значения переменной типа Integer")
m=Inputbox("Введите целочисленное значение переменной m:",_
"Окно ввода значения переменной типа Integer")
'преводим n и m к типу Integer
n=CInt(n)
m=CInt(m)
msgbox "Сумма "&n&" и "&m&" = "&(n+m)&vbcrlf&_
"Разность "&n&" и "&m&" = "&(n-m)&vbcrlf&_
"Произведение "&n&" и "&m&" = "&(n*m)&vbcrlf&_
"Частное "&n&" и "&m&" = "&(n \ m)&vbcrlf&_
"Остаток от деления "&n&" на "&m&" = "&(n mod m)
Пример 5
'Имя файла Long.vbs
'Программа вычисляет сумму, разность, произведение, частное и остаток от 'деления двух введённых чисел типа Long.
option explicit 'запрет на использование необъявленных переменных
dim n,m 'две рабочие переменные
' вводим переменные
n=Inputbox("Введите целочисленное значение переменной n:",_
"Окно ввода значения переменной типа Long")
m=Inputbox("Введите целочисленное значение переменной m:",_
"Окно ввода значения переменной типа Long")
'преводим n и m к типу Long
n=CLng(n)
m=CLng(m)
msgbox "Сумма "&n&" и "&m&" = "&(n+m)&vbcrlf&_
"Разность "&n&" и "&m&" = "&(n-m)&vbcrlf&_
"Произведение "&n&" и "&m&" = "&(n*m)&vbcrlf&_
"Частное "&n&" и "&m&" = "&(n \ m)&vbcrlf&_
"Остаток от деления "&n&" на "&m&" = "&(n mod m)
Пример 6
'Имя файла Double_1.vbs
'Программа вычисляет сумму, разность, произведение, частное и остаток от 'деления двух введённых чисел типа Double.
option explicit 'запрет на использование необъявленных переменных
dim n,m 'две рабочие переменные
' вводим переменные
n=Inputbox("Введите значение переменной n:",_
"Окно ввода значения переменной типа Double")
m=Inputbox("Введите значение переменной m:",_
"Окно ввода значения переменной типа Double")
'преводим n и m к типу Double
n=CDbl(n)
m=CDbl(m)
msgbox "Сумма "&n&" и "&m&" = "&(n+m)&vbcrlf&_
"Разность "&n&" и "&m&" = "&(n-m)&vbcrlf&_
"Произведение "&n&" и "&m&" = "&(n*m)&vbcrlf&_
"Частное "&n&" и "&m&" = "&(n \ m)&vbcrlf
Пример 7
'Имя файла Single.vbs.
'Программа вычисляет сумму, разность, произведение, частное и остаток от 'деления двух введённых чисел типа Single.
option explicit 'запрет на использование необъявленных переменных
dim n,m 'две рабочие переменные
' вводим переменные
n=Inputbox("Введите значение переменной n:",_
"Окно ввода значения переменной типа Single")
m=Inputbox("Введите значение переменной m:",_
"Окно ввода значения переменной типа Single")
'преводим n и m к типу Single
n=CSng(n)
m=CSng(m)
msgbox "Сумма "&n&" и "&m&" = "&(n+m)&vbcrlf&_
"Разность "&n&" и "&m&" = "&(n-m)&vbcrlf&_
"Произведение "&n&" и "&m&" = "&(n*m)&vbcrlf&_
"Частное "&n&" и "&m&" = "&(n \ m)&vbcrlf