Главная | Обратная связь | Поможем написать вашу работу!

Задание 1 для самостоятельного выполнения.

Задание 1 для самостоятельного выполнения.

Модифицируйте скрипт – программу, удалив обращение к функциям CSng. Запустите модифицированную программу с помощью Internet Explorer. Какой получается результат? Почему?

2. 2 Программирование арифметических и логических вычислений.

В VBScript можно программировать арифметические и логические вычисления, обрабатывать символьные данные.

Напомним, что логические данные принимают два значения: True и False. В логических выражениях используются следующие операции: AND (И – логическое умножение), OR (или – логическое сложение), NOT (нет – логическое отрицание). Эти операции объединяют данные логического типа. Например, неравенства, которые принимают значения True (А> B равно True при А =5 и B =3) или False (А> B равно False при А =3 и B =5).

Также как существует таблица умножения для чисел, существует таблица значений логических выражений в зависимости от значений операндов и используемых знаков логических операций («AND», «OR» и «NOT»), которую необходимо выучить:

Значение операнда А	Значение операнда В	Логическая операция NOT А	Логическая операция А AND В	Логическая операция А OR В
True	True	False	True	True
True	False	False	False	True
False	True	True	False	True
False	False	True	False	False

Если в логическом выражении присутствуют несколько знаков операций, то выражение вычисляется слева направо. Приоритет логических операций по убыванию: NOT, AND, OR. Приоритет можно изменять скобками аналогично арифметическим выражениям.

Примеры логических выражений:

§ A< =B And A=4 при значениях A=3, B=5 принимает значение False

§ C< =5 OR A< =B And C> =A при значениях A=3, B=5, С=7 принимает значение True (сначала вычисляется A< =B And C> =A, результат True, затем C< =5 OR True, результат True )

Задание 2 для самостоятельного выполнения.

Создайте две страницы. На первой вычисляется арифметическое выражение, на второй - логическое в соответствии сос своим вариантом задания.

Для ввода исходных данных и вывода результата использовать стандартные окна ввода - вывода. При вычислении логического выражения подобрать исходные данные для получения двух результатов: True и False.

Покажите работающие страницы преподавателю и сохраните в своей папке.

Варианты задания для самостоятельного выполнения:

№ варианта	Арифметическое выражение	Логическое выражение
1.	P+Q/ (X-Y*2. 33)	Х< =3. 3 And X< Y Or NOT H< Q
2.	X /(PQ-Y2. 3)	(H< 2. 5 Or A < =B) And A=4
3.	P*0. 25-Q/(M-N)	P> =Q Or H< 2. 5 And A=4
4.	(M/N+22. 3)/(P+1)/Q	Х< =3. 3 Or A> B And B> =4
5.	(PQ-7X)/(Y-1)	Х< =3. 3 And X< Y Or B> =4
6.	(X+Y7. 7)P+Q	X< =A And H=< 2. 5 Or P> =Q
7.	(M*N-2)/ P+1/Q	P > = Q And (H< 22. 5 Or H< Q)
8.	(M+N)/ (P+1)-Q	J> = 3. 22 And X < Y Or Х > =5. 3
9.	(M-N)/P+Q* (X-Y*2. 33)	Х> Y Or X< =A And NOT P> =Q
10.	(S-V-3* X)/(Y-22)	J> =3. 22 And (M< =N Or Х< =5. 3)
11.	(M/N+22. 3)/(S-V*3)	H=< 2. 5 Or M< =3. 3 And X< Y
12.	(M+N2. 3)/(S-V-3 X)	(Х> =Y Or X< 2. 5) And M< =N
13.	(PQ-7X)/(X-Y-1)	Х< =3. 3 Or X< Y And H< Q
14.	(X+Y*7. 7)/(P+Q)	H=< 2. 5 And Х< Y Or X> =2. 5
15.	(X-Y*2. 33)/P+Q	NOT X< Y Or P> =Q And H< 2. 5
16.	X /(PQ-Y2. 3)	J< =3. 22 Or X< Y And Х< =3. 3
17.	P*0. 25-Q/(M-N)	M< =N And (J< = 3. 22 Or X> =2. 5)
18.	(M/N+22. 3)/(P+1)/Q	(J< = 3. 22 Or X> =2. 5) And NOT A> =B
19.	(PQ-7X)/(M+N*2. 3)	NOT Х< =3. 3 And X< Y Or H< Q
20.	(M-N)/(P+Q*X)	(H< 2. 5 Or A < =B) And A=4

2. 3 Использование процедур и функций

В VBScript можно использовать процедуры и функции, аналогично их использованию в Visual Basic.

Можно выделить повторяющиеся фрагменты программы и сделать из них функциональные блоки. Эти блоки можно использовать без их повторного написания и отладки, собирая из них требуемую программу. Организовать функциональные блоки в VBScript можно в виде процедур (procedure) и функций (function). Процедурасодержит в первой строке ключевое слово Sub и имеет вид

Sub имя процедуры (список аргументов)

операторы

End Sub

Функциясодержит в первой строке ключевое слово Function и имеет вид

Function имя функции (список аргументов) операторы

имя функции = выражение

End Function

Список аргументовопределяет данные, которые передаются в процедуру и функцию из другой программы (входные аргументы) или наоборот передаются из нее в другую программу (выходные аргументы)

Пример процедуры:

'заголовок процедуры SubDemo с тремя аргументами- Rlen-длина, Rwid-ширина и Area-площадь

Sub SubDemo (Rlen, Rwid, Area)

Area = RLen * Rwid ' расчет площади

End Sub

Пример функции:

' расчет площади и присвоение имени функции вычисленного значения

'заголовок функции FunDemo с двумя аргументами- Rlen-длина и Rwid-ширина

Function FunDemo (RLen, Rwid)

FunDemo = RLen * Rwid

End Function

Обратите внимание, что в процедуре для вычисления и записи результата используется аргумент Area (выходной аргумент). В функции для записи результата используется имя функции FunDemo.

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

Для использования процедуры и функции нужно в каком-либо месте программы написатьобращение к этой процедуре или функции. Обращение к процедуре или функции производится по-разному:

Обращение к процедуре является отдельным оператором с использованием ключевого слова Call (Вызов).

Обращение к функции является операндом (составной частью) выражения.

Пример фрагмента программы для обращения к процедуре:

Dim A, B, C

A = CSng(InputBox(" Введите значение длины прямоугольника" ))

B = CSng(InputBox(" Введите значение ширины прямоугольника" ))

Call SubDemo (A, B, C)

MsgBox " Площадь прямоугольника равна " & C

Пример фрагмента программы для обращения к функции:

Dim A, B, C

A = CSng(InputBox(" Введите значение длины прямоугольника" ))

B = CSng(InputBox(" Введите значение ширины прямоугольника" ))

C = FunDemo (A, B) * 2

MsgBox " Удвоенная площадь прямоугольника равна " & C

Обратите внимание, что при обращении к процедуре и функции записываются значения аргументов (при обращении к процедуре - A, B, C; при обращении к функции - A, B). Им с использованием окна ввода InputBox задаются конкретные значения. Имена аргументов при обращении могут быть любыми (могут не совпадать с именами списка аргументов при записи процедуры или функции).

Должны соблюдаться следующие правила:

1. Количество значений аргументов при обращении равно количеству аргументов при записи процедуры или функции (При записи процедуры было 3 аргумента - Rlen, Rwid, Area; при обращении тоже 3 - A, B, C. При записи функции было 2 аргумента - Rlen, Rwid; при обращении тоже 2 - A, B).

2. Соответствие значений аргументов и аргументов определяется их последовательностью в списках (А соответствует Rlen, В - Rwid, С - Area).

В Visual Basic дополнительно необходимо соблюдать следующее правило: тип значений аргументов при обращении к процедуре и функции должен совпадать с типом аргументов при записи процедуры и функции. Так как в Visual Basic Script используется только один тип данных, то это правило можно игнорировать.

⇐ Предыдущая 123 4 5 6 7 8 9 10 Следующая ⇒

Воспользуйтесь поиском по сайту: