10. Обработка строковых выражений

Строка – это либо упорядоченная последовательность символов (знак, для которого установлен определенный код – число от 0 до 255), либо пустая строка. Для обозначения строки используются кавычки:

“” – обозначение пустой строки;

“студент” – пример непустой строки.

Количество символов в строке называют длиной строки.

Каждый символ в строке имеет свою позицию – порядковый номер при счете слева направо. Например, символ “д” в строке “студент” имеет 4-ю позицию.

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

Строки можно складывать, и эта операция называется конкатенацией. Конкатенация обозначается знаком “+” или “&”.

Следующий программный код демонстрирует единственную операцию над строками:

Dim S1 As String, S2 As String, S As String

S1=”Сам” : S2 = “лет”

S=S1+”о”+S2

Значением переменной S будет строка “Самолет”.

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

Например,

left(«Василий»,3) дает результат «Вас»,

right(«Василий»,3) дает результат «лий»

mid(«Василий»,2,3) дает результат «аси».

Задача Ввести слово и определить совпадают ли в нем вторая буква от начала слова и третья буква от конца слова (в слове больше 3-х букв).

Пусть S – слово, S2 – вторая буква от начала слова, а S3 – третья буква от конца слова, L-длина слова. Для ввода слова S используем функцию InputBox, а для вывода букв S1 и S3 оператор MsgBox.

Программа:

Private Sub Command1_Click()

Dim S As String, S2 As String, S3 As String

Dim L As Integer

S = InputBox("Введите слово")

L = Len(S)

S2 = Mid(S, 2, 1)

S3 = Mid(S, L - 2, 1)

If S2 = S3 Then MsgBox(" буквы совпадают") Else MsgBox( "буквы не совпадают")

End Sub

Задача . Ввести слово и образовать новое слово из всех четных букв.

Пусть S – слово, S2 – очередная четная буква, Sn – новое слово, L-длина слова, I – счетчик цикла. Для ввода слова S используем функцию InputBox, а для вывода очередной четной буквы - оператор MsgBox.

Программа:

Private Sub Command1_Click()

Dim S As String, S2 As String, Sn As String

Dim L As Integer, I As Integer

S = InputBox("Введите слово")

L = Len(S)

Sn = ""

For I = 2 To L Step 2

S2 = Mid(S, I, 1)

Sn = Sn + S2

Next I

MsgBox("Новое слово-"+ Sn)

End Sub

12. Контрольные вопросы по языкам программирования ( разделы №10 и №11)

№	тема	Вопрос
	36	Ни в одном языке программирования нет ... выражений.
	36	Нельзя считать формальным исполнителем алгоритма:
	36	Что не является основным свойством алгоритма?
	36	Что не является основным свойством алгоритма?
	36	Какой формы представления алгоритма нет ?
	36	Алгоритм это…
	36	НЕ существует следующего вида алгоритмов ….
	36	НЕ существует следующего вида циклов …
	36	Ни в одном языке программирования нет ... функций
	36	Цикл DO WHILE выполняется до тех пор…
	36	Цикл DO UNTIL выполняется до тех пор…
	36	Цикл FOR выполняется до тех пор…
	37	Какой критерий качества программных систем является обязательным?
	37	Процесс поиска ошибок в программе принято называть ...
	37	Что означает положительный результат при тестировании программных систем:
	37	Как называется процесс при котором выполняется интенсивное использование программной системы с целью выделения максимального числа ошибок в его работе для их устранения перед выходом продукта на рынок?
	37	Как называется тестирование, при котором выявляется, что сделанные изменения не повлияли на функциональность предыдущей версии:
	37	Как называется тестирование, при котором разработчик теста имеет доступ к исходному коду и может писать код, который связан с библиотеками тестируемого ПК:
	37	Что понимается под жизненным циклом программного средства:
	37	Наиболее точным определением понятия "массив" является...
	37	Вычислимой функцией называется функция, для которой
	37	Операторы цикла в языках программирования
	37	Операторы присваивания в языках программирования
	37	Интегрированная система программирования включает компонент для перевода исходного текста программы в машинный код, который называется...
	38	if a<0 then a=-a if b<0 then b=-b do while a > b a=a-b loop В результате выполнение данного алгоритма с начальными значениями a=-13;b=5 переменные примут следующие значения:
	38	if a<0 then a=-a if b<0 then b=-b do a=a-b loop while a>b В результате выполнение данного алгоритма с начальными значениями a=-13;b=5 переменные примут следующие значения:
	38	В результате выполнения фрагмента программы s=1 n=1 for i=2 to 5 n=n+1 s=s+i Next i переменные n, s примут значения
	38	В результате выполнения фрагмента программы s=0 n=1 for i=2 to 4 n=n*i s=s+i Next i переменные n, s примут значения
	38	В результате выполнения фрагмента программы s=1 n=0 for i=1 to 3 n = n +1 s=s*i Next i переменные n, s примут значения
	38	В результате выполнения фрагмента программы s=0; n=0 for i=2 to 5 ste n=n+1; s=s+i Next i переменные n, s примут значения
	38	В результате выполнения фрагмента программы s=1; n=1 for i=2 to 6 step 2 n=n+1 s=s+i Next i переменные n, s примут значения
	38	В результате выполнения фрагмента программы s=0; n=0 for i=2 to 6 step 2 n=n+1 s=s+i Next i переменные n, s примут значения
	38	if a<0 then a=-a if b<0 then b=-b do While a>b a=a-b: b=b+1 loop В результате выполнение данного алгоритма с начальными значениями a=-13;b=5 переменные примут следующие значения:
	38	if a<0 then a=-a if b<0 then b=-b do until a>b a=a-b loop В результате выполнение данного алгоритма с начальными значениями a=-13;b=5 переменные примут следующие значения:
	38	if a<b then c=b-a else c=2*(b-a) d=0 do while c>d d= d +1 c=c-1 loop В результате выполнение данного алгоритма с начальными значениями a=3;b=6 переменные c d примут следующие значения:
	38	if a<b then c=b-a else c=2*(b-a) d=0 do until c < d d= d +1 c=c-1 loop c>a В результате выполнение данного алгоритма с начальными значениями a=3;b=6 переменные c d примут следующие значения:
	39	Приведённый фрагмент программы s=0 for x=2 to 6 step 2 Z=x*sin(x) s=s+z Next x находит:
	39	Приведённый фрагмент программы s=0 n=0 for x=2 to 6 step 2 Z=x*sin(x) s=s+z n=n+1 Next x c=s/n находит:
	39	Приведённый фрагмент программы s=1 for x=2 to 6 step 2 Z=x*sin(x) s=s*z Next x находит:
	39	Приведённый фрагмент программы s=0 for x=2 to 6 step 2 Z=x*sin(x) if z>0 then s=s+1 Next x находит:
	39	Приведённый фрагмент программы s=0 for x=2 to 6 step 2 Z=x*sin(x) if z>0 then s=s+z Next x находит:
	39	Приведённый фрагмент программы s= 2*sin(2) for x=2 to 6 step 2 Z=x*sin(x) if z > s then s=Z Next x находит
	39	Приведённый фрагмент программы s= 2*sin(2) for x=2 to 6 step 2 Z=x*sin(x) if z<s then s=Z Next x находит:
	39	Приведённый фрагмент программы s= 1 for x=2 to 6 step 2 Z=x*sin(x) if Z<>0 then s=Z*s Next x находит:
	39	Приведённый фрагмент программы s= 1 for i=1 to 6 if z(i)<>0 then s=z(i)*s Next i находит
	39	Приведённый фрагмент программы s= 0 for i=1 to 6 s=s+z(i) Next i c=s/6 находит:
	39	Приведённый фрагмент программы s= z(1) for i=2 to 6 if z(i)<S then s=z(i) Next i находит:
	39	Приведённый фрагмент программы s= z(1) for i=2 to 6 if z(i)>S then s=z(i) Next i находит:
	40	ClearContents - метод позволяющий …
	40	Select – метод позволяющий …
	40	Copy – метод позволяющий…
	40	Paste– метод позволяющий…
	40	Cells - свойство, определяющее…
	40	Value – - свойство, определяющее …
	40	Range - свойство, определяющее
	40	Name- свойство, определяющее
	40	Caption - свойство, определяющее…
	40	Change – это событие …
	40	Click() - это событие …
	40	DblClick()– это событие …