Главная / Программирование /
Программирование на Lazarus / Тест 6
Программирование на Lazarus - тест 6
Упражнение 1:
Номер 1
Имеется две строковых переменных с текстом – s1
и s2
. Требуется получить объединенную строку из этих переменных, где каждая из строк была бы на отдельной строке. Укажите правильные варианты такого объединения:
Ответ:
 (1) s1:= s1 + #13 + s2
 
 (2) s1:= s1 * #13 * s2
 
 (3) s1:= s1 > #13 > s2
 
 (4) s1:= Concat(s1 + #13 + s2)
 
 (5) s1:= Concat(s1, #13, s2)
 
 (6) s1:= Concat(s1; #13; s2)
 
Номер 2
Для чего служит функция Concat()
?
Ответ:
 (1) для разделения строки на подстроки 
 (2) для объединения строк 
 (3) для определения длины строки 
 (4) для определения количества байт, занимаемых строкой 
Номер 3
Какой функцией можно объединить две или более строк в одну стоку?
Ответ:
 (1) Copy()
 
 (2) Concat()
 
 (3) Summ()
 
 (4) Length()
 
 (5) Pos()
 
Упражнение 2:
Номер 1
Какой функцией можно определить длину стоки?
Ответ:
 (1) Copy()
 
 (2) Concat()
 
 (3) Summ()
 
 (4) Length()
 
 (5) Pos()
 
Номер 2
Какое значение вернет функция Length
после выполнения кода?st:= 'Москва';
Length(st);
Ответ:
 (1) 1 
 (2) 6 
 (3) 12 
 (4) 18 
 (5) 24 
Номер 3
Имеется строковая переменная st, в которой находится русский текст. Какую функцию нужно использовать, чтобы узнать количество символов в этом тексте?
Ответ:
 (1) Concat()
 
 (2) UTF8Concat()
 
 (3) Length()
 
 (4) UTF8Length()
 
 (5) Pos()
 
 (6) UTF8Pos()
 
Упражнение 3:
Номер 1
Какой функцией можно определить, входит ли искомая подстрока в строку?
Ответ:
 (1) Copy()
 
 (2) Concat()
 
 (3) Summ()
 
 (4) Length()
 
 (5) Pos()
 
Номер 2
Какой функцией можно определить, входит ли искомая подстрока в строку, если в строке содержится русский текст?
Ответ:
 (1) Copy()
 
 (2) UTF8 Copy()
 
 (3) Concat()
 
 (4) UTF8Concat()
 
 (5) Pos()
 
 (6) UTF8Pos()
 
Номер 3
Что вернет функция Pos() / UTF8Pos()
, если искомой подстроки в строке нет?
Ответ:
 (1) минус единицу 
 (2) ноль 
 (3) номер первого символа строки – единицу 
 (4) номер последнего символа строки 
 (5) в этом случае функция вызовет ошибку программы 
Упражнение 4:
Номер 1
Какой функцией можно из строки получить её часть (подстроку)?
Ответ:
 (1) Copy()
 
 (2) Concat()
 
 (3) Length()
 
 (4) Pos()
 
Номер 2
Какой функцией можно из строки получить её часть (подстроку), если в строке содержится русский текст?
Ответ:
 (1) Copy()
 
 (2) UTF8 Copy()
 
 (3) Concat()
 
 (4) UTF8Concat()
 
 (5) Pos()
 
 (6) UTF8Pos()
 
Номер 3
Как из строки «Санкт-Петербург» получить подстроку «Петербург»?
Ответ:
 (1) UTF8Copy('Санкт-Петербург', 0, 5)
 
 (2) UTF8Copy('Санкт-Петербург', 1, 6)
 
 (3) UTF8Copy('Санкт-Петербург', 7, 9)
 
 (4) UTF8Copy('Санкт-Петербург', 9, 7)
 
Упражнение 5:
Номер 1
Что делает функция Delete()
?
Ответ:
 (1) удаляет строковую переменную 
 (2) удаляет из строки текст (очищает переменную) 
 (3) удаляет часть строки 
 (4) удаляет из строки все вхождения заданного символа 
Номер 2
В строку st нужно получить текст «честно». Укажите, как это сделать, если имеется код:var
st: string;
begin
st:= 'нечестно';
Ответ:
 (1) UTF8Delete(st, 3, 6)
 
 (2) UTF8Delete(st, 3, 8)
 
 (3) UTF8Delete(st, 1, 2)
 
 (4) UTF8Delete(st, 1, 6)
 
 (5) UTF8Delete(st, 1, 8)
 
Номер 3
Имеется строка «Орешек». Какую функцию нужно использовать, чтобы превратить её в «ОРЕШЕК»?
Ответ:
 (1) UpperCase
 
 (2) UTF8UpperCase
 
 (3) LowerCase
 
 (4) UTF8LowerCase
 
Номер 4
Имеется строка «Калибр». Какую функцию нужно использовать, чтобы превратить её в «калибр»?
Ответ:
 (1) UpperCase
 
 (2) UTF8UpperCase
 
 (3) LowerCase
 
 (4) UTF8LowerCase
 
Упражнение 6:
Номер 1
Требуется вывести сообщение, где помимо текста будет кнопка «ОК» с изображением зеленой «галочки» и иконка информации – синяя «i» в белой выноске. Как это сделать?
Ответ:
 (1) Application.MessageBox('Текст', 'Заголовок', 'i', MB_OK)
 
 (2) Application.MessageBox('Текст', 'Заголовок', 'i', MB_YES)
 
 (3) Application.MessageBox('Текст', 'Заголовок', MB_ICONINFORMATION+MB_OK)
 
 (4) Application.MessageBox('Текст', 'Заголовок', MB_ICONINFORMATION+MB_YES)
 
Номер 2
Требуется вывести сообщение-запрос, где помимо текста будут кнопки «Yes» и «No», иконка запроса с вопросительным знаком. Как это сделать?
Ответ:
 (1) MessageDlg('Заголовок', 'Текст запроса', mtConfirmation, [mbYes, mbNo], 0)
 
 (2) MessageDlg('Текст запроса', 'Заголовок', mtInformation, [mbYes, mbNo], 0)
 
 (3) MessageDlg('Заголовок', 'Текст запроса', mtWarning, [mbYes, mbNo], 0)
 
 (4) MessageDlg('Текст запроса', 'Заголовок', mtCustom, [mbYes, mbNo], 0)
 
Номер 3
Чтобы получить от пользователя его имя, нам нужно вывести окно с соответствующим запросом. Какую функцию для этого мы будем использовать?
Ответ:
 (1) ShowMessage()
 
 (2) InputQuery()
 
 (3) MessageBox()
 
 (4) MessageDlg()