Контрольная программирование. Выберите верные выражения, характерные для понятия множество

• Название: Выберите верные выражения, характерные для понятия множество
• Дата: 13.01.2022
• Размер: 0.71 Mb.
• Имя файла: Контрольная программирование.docx
• Тип: Документы; #330259
• страница: 8 из 13

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

Question12

Какие операторы допускается использовать для работы со строками?

	/
	>
	>=
	Mod
	+
	Not
	*

Неверно



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

Question13

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

type dvig = (vverh, vniz, vpravo, vlevo);
var x, y: dvig; t: (vpered, nazad); k: integer;

Выберите строки, которые НЕ содержат ошибки.

	For t:=vpered to nazad do {тело цикла};
	For k:=vverh to nazad do {тело цикла};
	For x:=vniz to vlevo do {тело цикла};
	For y:=vlevo downto vverh do {тело цикла};
	For t:=vverh to vpravo do {тело цикла};

Неверно



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

Question14

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

b:=6; k:=1; a:=2;
While kk:=k*a;
k:=k+3;
Writeln(k);

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



Неверно



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

Question15

Для построения многоугольников используют процедуру:

	DrawPoly
	InitGraph
	ClearDevice
	Rectangle
	Bar
	CloseGraph
	SetFillStyle

Верно

Дана рекурсивная функция:

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

Какую задачу решает эта функция?

	Эта функция не является рекурсивной.
	Находит факториал числа n.
	Находит произведение n элементов массива.
	Находит n-e число Фибоначчи.
	Находит сумму натуральных чисел до n.

Неверно



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

Question2

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

var i, e: integer; s: string;
begin
s:='123';
val (s, i, e);
writeln (e);
end.

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



Верно



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

Question3

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

type dvig = (vverh, vniz, vpravo, vlevo);
var x, y: dvig; t: (vpered, nazad); k: integer;

Выберите строки, которые НЕ содержат ошибки.

	For k:=vverh to nazad do {тело цикла};
	For t:=vpered to nazad do {тело цикла};
	For x:=vniz to vlevo do {тело цикла};
	For t:=vverh to vpravo do {тело цикла};
	For y:=vlevo downto vverh do {тело цикла};

Неверно



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

Question4

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

Var a, b, c: integer; d, g: real; t, f: boolean;

Выберите выражения, которые записаны верно.

	d:=d*a-b/c;
	t:=a mod 10;
	5:=b*8-c;
	c:=d and b;
	c:=(a+25) div b;
	f:=t or f;

Неверно



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

Question5

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

	массивов
	множеств
	записей
	файлов

Верно



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

Question6

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

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

Неверно



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

Question7

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

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

Неверно