тусур програмирование. Документ Microsoft Office Word (2). Выберите ссылочные типы данных

• Название: Выберите ссылочные типы данных
• Анкор: тусур програмирование
• Дата: 24.05.2022
• Размер: 1.22 Mb.
• Имя файла: Документ Microsoft Office Word (2).docx
• Тип: Документы; #547678
• страница: 9 из 16

Выберите все верные ответы (может быть несколько или один).

Question14

Выберите конструкции, которые используются для представления условного оператора.

	Repeat <оператор1>; <оператор2>; until <условие>;
	If <условие> Then <оператор1> Else <оператор2>;
	For <переменная>:=<выражение1> to <выражение2> do begin <оператор1>; <оператор2>; end;
	While <условие> Do begin <оператор1>; <оператор2>; end;
	If <условие> Then <оператор>;
	While <условие> Do <оператор>;

Верно

Выберите все верные ответы (может быть несколько или один).

Question15

Функция copy (S: string; I: integer; C: integer): string выделяет из строки { ;  ;  } подстроку длиной { ;  ;  } символов, начиная с позиции { ;  ;  }.

Неверно

Следуйте подсказкам по вводу ответов.

Начало формы

• 
  ► Контрольная работа № 2 по дисциплине 'Программирование - 2'
  

 

Начало формы

Конец формы

Тест начат	Вторник 17 Май 2022, 18:35
Завершен	Вторник 17 Май 2022, 18:49
Прошло времени	14 мин 26 сек
Правильных ответов из	5/15
Оценка	33.33 из максимума 100 (33%)
Результат	Незачет

Question1

Типичное представление целых чисел в Паскале осуществляется с помощью типа данных:

	Real
	Integer
	Char
	Boolean

Верно

Выберите все верные ответы (может быть несколько или один).

Question2

Какие элементы будут в множестве b после выполнения следующих операций?

b:=[1,2,4,6]; b:=b*[2,4,12]; b:=b+[2,6,18];

	[2,2,4,6,12,18]
	[4,6,12,18]
	[2,4,6,18]
	[2,6]

Неверно

Выберите все верные ответы (может быть несколько или один).

Question3

Даны заголовки процедур. Выберите строки, в которых содержатся ошибки.

	Procedure Primer(var a,b:integer; c,d:real);
	Procedure Primer(var a:integer; c:real):integer;
	Procedure Primer(var a:integer; c:real);
	Procedure Primer(var a:integer; c:function);
	Procedure Var(a:integer; c:real);

Неверно

Выберите все верные ответы (может быть несколько или один).

Question4

Даны описания:

Var a: array ['a'..'z'] of real; k: integer;

Выберите строку, в которой есть ошибка при обращении к массиву.

	A[k]:=26.345;
	A['z']:=5 mod 2;
	A['r']:=a['s']+a['e'];
	A[chr(ord('b'))]:=-38.23;
	A['d']:=123.5;

Неверно

Выберите все верные ответы (может быть несколько или один).

Question5

Дан фрагмент программы:

b:=5; k:=1;
For a:=b downto 4 do
Begin
k:=k*a;
k:=k+1;
end;
Writeln(k);

Что будет выведено на экран?

Неверно

Введите число.

Question6

Выберите ссылочные типы данных.

	Char
	Array
	Procedure
	Function
	Set
	File
	Byte
	Single
	Pointer

Неверно

Выберите все верные ответы (может быть несколько или один).

Question7

Дана программа:

Var a,b,c,d:integer;
procedure obmen(a:integer; var b:integer);
Var s:integer;
Begin
s:=a; a:=b; b:=s;
end;
Begin
a:=3; b:=5; c:=12; d:=10;
obmen(d,c);
writeln(c);
end.

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

Неверно

Введите слово, словосочетание или символьно-цифровое выражение.

Question8

Дан фрагмент программы:

Type a = record i, f, j: real; c: integer; end;
Var z: a;

Выберите строки, в которых есть ошибки обращения к записи.

	z.i:=1; z.f:=3.5; z.c:=8; z.j:=z.c*z.f;
	z.i:=2/5; z.f:=z.i/8; z.c:=2*z.i; z.j:=z.c*z.f;
	z.i:=1/9; z.f:=z.i/8; z.c:=2; z.j:=z.i mod z.c;
	z.i:=1; z.f:=z.i/8; z.c:=2; z.j:=z.c*z.f;

Неверно

Выберите все верные ответы (может быть несколько или один).

Question9

Что будет выведено на экран после выполнения программы?

type dvig = (vverh, vniz, vpravo, vlevo);
var x, y: dvig; t: (vpered, nazad); k: integer;
Begin
T:=nazad; X:=vniz;
Case x of
Vverh, vniz: k:=1;
Else k:=0;
End;
Writeln (k);
End.

Верно

Введите слово, словосочетание или символьно-цифровое выражение.

Question10

Выберите строку, в которой верно описана рекурсивная функция.

	Function f (n: integer): integer; begin if n=0 then f:=0 else f:=n-1+15 end;
	Function f (n: integer): integer; begin if n=0 then f:=0 else f:=n+1 end;
	Function f (n: integer): integer; begin if n=0 then f:=0 else f:=f(n-1)+1 end;
	Function f (n: integer): integer; begin if n=0 then f:=0 else f:=1 end;

Верно

Выберите все верные ответы (может быть несколько или один).

Question11

Стек – это линейный список, в котором:

	все включения и исключения производятся в произвольной позиции списка
	все включения производятся на одном конце списка, а все исключения – на другом конце
	все включения и исключения делаются в одном конце списка

Верно

Выберите все верные ответы (может быть несколько или один).

Question12

Функция … имеет значение «истина», когда находит символ «конец файла».

	EOF
	SEEK
	EOLN

Неверно

Выберите все верные ответы (может быть несколько или один).

Question13

Функция copy (S: string; I: integer; C: integer): string выделяет из строки { ;  ;  } подстроку длиной { ;  ;  } символов, начиная с позиции { ;  ;  }.

Неверно

Следуйте подсказкам по вводу ответов.

Question14

Дан фрагмент программы:

b:=8; k:=1; a:=2;
Repeat
k:=k*a;
Until k>b;
Writeln(k);

Что будет выведено на экран?

Неверно

Введите число.

Question15

Для установки требуемого шрифта в графическом режиме используют процедуру:

	ClearDevice
	InitGraph
	CloseGraph
	SetFillStyle
	SetTextStyle

Верно

Выберите все верные ответы (может быть несколько или один).


Очередью называется линейный список, в котором:

	все включения и исключения делаются в одном конце списка
	все включения производятся на одном конце списка, а все исключения – на другом конце
	все включения и исключения производятся в произвольной позиции списка

Верно