Главная / Программирование /
Программирование на языке Pascal / Тест 5
Программирование на языке Pascal - тест 5
Упражнение 1:
Номер 1
Какой стандартной функции или процедуре обработки строк эквивалентен следующий программный отрывок?
{s: string; i,k,t: byte}
res:= '';
t:= length(s);
if i > t then i:= t+1;
for j:= 1 to i-1 do res:= res + s[j];
for j:= i+k-1 to t do res:= res + s[j];
Ответ:
 (1) copy(s,i,k)
 
 (2) delete(s,i,k)
 
 (3) insert(s1,s2,i)
 
Номер 2
Какой стандартной функции или процедуре обработки строк эквивалентен следующий программный отрывок?
{s1,s2: string; i,j,t1,t2: byte}
i:=0;
res:= '';
t1:= byte(s1[0]);
t2:= byte(s2[0]);
if i > t2 then i:= t2+1;
for j:= 1 to i-1 do res:= res + s2[j];
for j:= 1 to t1 do res:= res + s1[j];
for j:= i to t2 do res:= res + s2[j];
Ответ:
 (1) copy(s,i,k)
 
 (2) delete(s,i,k)
 
 (3) insert(s1,s2,i)
 
Номер 3
Какой стандартной функции или процедуре обработки строк эквивалентен следующий программный отрывок?
{s: string; i,k,t: byte}
res:= '';
t:= byte(s[0]);
if k+i > t+1 then k:= t-i;
if i <= t
then for j:= i to i+k do res:= res + s[j];
Ответ:
 (1) copy(s,i,k) 
 (2) delete(s,i,k) 
 (3) insert(s1,s2,i) 
Упражнение 2:
Номер 1
Какие из приведенных ниже последовательностей строк и символов упорядочены по убыванию?
Ответ:
 (1) '9', '82', '4569', '135' 
 (2) '99', '52', '8' 
 (3) 'season', 'sea', 'Son' 
 (4) 'Шекспир', 'пьеса', 'Гамлет' 
 (5) 'Анна', 'АННА', 'anna', 'Anna', 'ANNA' 
Номер 2
Какие из приведенных ниже последовательностей строк и символов упорядочены по возрастанию?
Ответ:
 (1) 'мама', 'мыла', 'раму' 
 (2) 'ZZzz', 'zZzZ', 'zzZZ' 
 (3) '1', '5', '10', '15' 
 (4) '12', '125', '234', '48' 
 (5) 'Россия', 'родина', 'слонов' 
Упражнение 3:
Номер 1
Какие из приведенных ниже описаний констант являются правильными с точки зрения Pascal-компилятора?
Ответ:
 (1) с1 = #67 
 (2) c2 = #(2*13) 
 (3) c3 = 't' 
 (4) st1 = ''''+'Сhar'+'''' 
 (5) st2 = '' 
 (6) s2 = [1..10,5..15] 
 (7) s3 = ['a'..'z',0..9] 
 (8) s5 = [-128..128] 
Номер 2
Какие из приведенных ниже описаний констант являются правильными с точки зрения Pascal-компилятора?
Ответ:
 (1) st2 = ''fgh'' 
 (2) c3 = #1000 
 (3) st1 = #56+'xyz' 
Номер 3
Какие из приведенных ниже описаний констант являются правильными с точки зрения Pascal-компилятора?
Ответ:
 (1) c1 = 'f' 
 (2) c2: char = '' 
 (3) c3 = #-100 
 (4) st1 = #67+'''муся' 
 (5) st2 = '' 
 (6) s1 = [0..128, -128..0] 
 (7) s2 = ['a'..'t','z','0..9'] 
Упражнение 4:
Номер 1
Какую операцию реализует приведенный ниже программный отрывок?
for i:= 1 to N do
set_res[i]:= (set1[i] or set2[i])and not set2[i]
Ответ:
 (1) объединение двух множеств, заданных битовым массивом 
 (2) пересечение двух множеств, заданных битовым массивом 
 (3) разность двух множеств, заданных битовым массивом 
Номер 2
Какую операцию реализует приведенный ниже программный отрывок?
for i:= 1 to N do
set_res[i]:= set1[i] or set2[i]
Ответ:
 (1) объединение двух множеств, заданных битовым массивом 
 (2) пересечение двух множеств, заданных битовым массивом 
 (3) разность двух множеств, заданных битовым массивом 
Номер 3
Какую операцию реализует приведенный ниже программный отрывок?
for i:= 1 to N do
set_res[i]:= set1[i] and set2[i]
Ответ:
 (1) объединение двух множеств, заданных битовым массивом 
 (2) пересечение двух множеств, заданных битовым массивом 
 (3) разность двух множеств, заданных битовым массивом