Добавил:
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:

Зайцев М. Г. / тест строки

.docx
Скачиваний:
18
Добавлен:
02.01.2020
Размер:
149.6 Кб
Скачать

1

Баллов: 2

Процедура Str.

Укажите типы параметров.

procedure Str(S:;var n:)

2

Баллов: 1

Укажите действия, которые выполняются при сравнении строк.

Выберите по крайней мере один ответ:

a. строки выравниваются по левому краю.

b. строка меньшей длины дополняется справа символами с кодом 0.

c. строка меньшей длины дополняется слева символами с кодом 0.

3

Баллов: 1

var s: string = ' 1 2 3 4 5 '; begin while Pos(' ',s) <> 0 do Delete(s,Pos(' ',s),1); write(s); readln; end. В результате выполнения программы строка s примет значение

Выберите один ответ.

a. '12345'

b. '1 2 3 4 5'

c. '1 2 3 4 5 '

d. ' 1 2 3 4 5'

4

Баллов: 1

Укажите истинные утверждение

const a = 'MASHA'; b = 'MISHA';

Выберите по крайней мере один ответ:

a. a > b.

b. a = b.

c. a >= b.

d. a <> b.

e. a < b.

f. a <= b.

5

Баллов: 1

Укажите операции, определённые на значениях типа String.

Выберите по крайней мере один ответ:

a. = (равно).

b. <> (не равно).

c. > (больше).

d. mod.

6

Баллов: 1

Укажите действия, которые выполняется при сравнении строк.

Выберите по крайней мере один ответ:

a. строка меньшей длины дополняется справа символами с кодом 0.

b. строки выравниваются по левому краю.

c. сравниваются посимвольно слева направо

d. сравниваются посимвольно справа налево.

7

Баллов: 1

Укажите недопустимые присваивания var Z: String; C: Char;

Выберите по крайней мере один ответ:

a. Z:= C.

b. Z:= ’Russia’.

c. C:= Copy(Z,1,1).

d. C:= Z.

e. C:= Z[0].

8

Баллов: 1

Задан массив A[1..4], состоящий из строк A = ("2000","836","102",''21"). После сортировки по возрастанию элементы массива будут расположены в следующем порядке

Выберите один ответ.

a. "21","2000","102","836"

b. "102","2000","21","836"

c. "2000","836","102","21"

d. "21","102","836","2000"

9

Баллов: 1

uses SysUtils; function R(s: string):string;

begin

result:= '';

while length(s) <> 0 do begin

result:= result + s[length(s)];

delete(s,length(s),1);

end;

end;

begin

writeln(R('123456'));

readln;

end. В результате выполнения программы на экран будет выведено

Ответ:

10

Баллов: 2

Функция Length. Укажите типы параметров.

function Length(S1:):

Начало формы

11

Баллов: 1

Укажите ложное утверждение

var j: integer; x: string;

begin

x:= 'MS DOS'; for j:= 1 to Length(x)) do x[j]:='1';

end.

Выберите один ответ.

a. x = ''

b. x = '111111'.

c. Length(x) = 6.

12

Баллов: 1

Задан массив A[1..4], состоящий из строк A = ("10а","8а","10б",''11а"). После сортировки по возрастанию элементы массива будут расположены в следующем порядке

Выберите один ответ.

a. "11а","10а","11б","8а"

b. "10а","8а","10б","11а"

c. "10а","10б","11а","8а"

d. "8а","10а","10б","11а"

13

Баллов: 1

Укажите операции, определённые на значениях типа String.

Выберите по крайней мере один ответ:

a. + (объединение)

b. >= (больше или равно).

c. = (равенство)

d. <= (меньше или равно).

e. div.

f. < (меньше).

g. <> (не рвно)

14

Баллов: 4

Функция Copy.

Укажите типы параметров.

function Copy(S:;n:;c: ):

15

Баллов: 1

Str

                                 

length

                                 

insert

                                 

Val

                                 

delete

                                 

copy

                                 

concat

                                 

pos

                                 

16

16Баллов: 3

Процедура Insert.

Укажите типы параметров.

procedure Insert(S:;n:;c: ;)

17

Баллов: 1

Укажите истинные утверждение const a = 'ANN'; b = 'ANNET';

Выберите по крайней мере один ответ:

a. a < b.

b. a >= b.

c. a <> b.

d. a > b.

e. a = b.

f. a <= b.

18

Баллов: 3

Процедура Val.

Укажите типы параметров.

procedure Val(S:;var n:;var c: ;)

19

Баллов: 1

function dls(s: string):string; begin while s[1] = ' ' do Delete(s,1,1); result:= s; end; var  z: string = ' 1 2 3 4 5 '; s: string; begin s:= dls(z);  write(s); readln; end. После выполнения программы будет строка s примет значение

Выберите один ответ.

a. ' 12345 '

b. '12345'

c. ' 1 2 3 4 5'

d. ' 12345 '

e. '1 2 3 4 5 '

20

Баллов: 3

Процедура Delete.

Укажите типы параметров.

procedure Delete(S:;n:;c: ;)

21

Баллов: 1

var s: string = ' 1 2 3 4 5 '; begin while s[1] = ' ' do Delete(s,1,1); writeln(s); readln; end. После выполнения программы будет строка s примет значение

Выберите один ответ.

a. ' 1 2 3 4 5'

b. '12345'

c. ' 12345 '

d. '1 2 3 4 5 '

e. ' 12345 '

22

Баллов: 3

Функция Pos.

Укажите типы параметров.

function Pos(S1:;S:):

Соседние файлы в папке Зайцев М. Г.