тест информ. Тема основные понятия и методы теории информатики кодирование информации Задание 1 1 1 (8)

• Название: Тема основные понятия и методы теории информатики кодирование информации Задание 1 1 1 (8)
• Дата: 20.12.2019
• Размер: 202.22 Kb.
• Имя файла: тест информ.docx
• Тип: Документы; #101296
• страница: 5 из 6

Задание_5_7_2 (4)

С После выполнения алгоритма

 



значение переменной X равно _____.

 

(31)

 

Оператор цикла с параметром

Задание_5_7_3 (6)

С В результате работы алгоритма

 

Edit1.text:='';

For k := 1 To 5 Do

Begin

Edit1.text:=Edit1.text+inttostr(k)+' ';

If k >= 4 Then

Edit1.text:=Edit1.text+inttostr(k)+' '

Else

Begin

Edit1.text:=Edit1.text+inttostr(k+1)+' ';

Edit1.text:=Edit1.text+inttostr(k-1)+' '

End

End;

 

будет выведено на форму ____ чисел.

 

(13)

 





Задание_5_7_4 (15)

A Точки с координатами (i, Y), последовательно получаемыми при выполнении фрагмента алгоритма

 

Y := 1; i := 0; for i := 1 to 6 do Y := Y – i ;

 

расположены на графике

 

1) A

2) B

3) C

4) D

5) Y = 0

 

(4)

 

Оператор цикла с предусловием

Задание_5_7_5 (6)

С После выполнения фрагмента программы

 

a := 73045;

b := 0;

While a <> 0 Do

Begin

b := b + a Mod 10;

a := a div 10;

End;

 

значение переменной b равно ___.

 

(19)

 

Задание_5_7_6 (6)

A В представленном фрагменте программы

 

X := 7; Y := round ( X / 2) + 4;

while X <= Y do Y := (X + Y) mod 8;

 

тело цикла будет выполнено

 

1) 2 раза 2) 1 раз 3) 0 раз 4) 3 раза 5) 4 раза

 

(1)

 

 

Операторы цикла с постусловием

Задание_5_7_7 (7)

С После выполнения фрагмента программы

 

x := 11;

Repeat

x := x + 1;

If x >= 20 Then break Else x := x + 1;

Until x >= 15;

 

значение переменной x равно _____.

(15)

Количество повторений цикла

Задание_5_7_8 (6)

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

 

A := 0; B := 20;

While A <= B Do

Begin

A := A + 2;

If A > 10 Then Break;

End;

Тело цикла выполнится _____ раз.

(6)

 

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

 

A:=-2; B := 2;

n := Ceil((B-A)/0.5)+1;

x:=-2;

For i:= 1 To n Do

Begin

B := Sqr(B);

If x=0 Then Break;

x:=x+0.5

End;

Тело цикла выполнится _____ раз.

(5)

Замена цикла с параметром на цикл с условием

Задание_5_7_9 (4)

A Фрагмент программы

 

s: = 3;

For i := 3 To 10 Do

s = 2 * s – 1;

 

можно заменить на один из следующих фрагментов

 

1) s := 3; i := 3; While i <= 10 Do begin s := 2 * s – 1; i := i + 2; End;	2) s := 3; i := 3; Repeat s := 2 * s – 1; i := i + 1; Until i >= 10;
3) s := 3; i := 3; While i <= 10 Do begin s := 2 * s – 1; i := i + 1; End;	4) s := 3; i := 3; Repeat s := 2 * s – 1; i := i + 1; Until i <= 10;
5) s := 3; i := 3; While i < 10 Do begin s := 2 * s – 1; i := i + 1; End;

(3)

Вложенные циклы

Задание_5_7_10 (10)

С После выполнения фрагмента программы

 

k := 1;

For i := 1 To 5 do

For j := i To 5 do

k := k + 1;

 

значение переменной k стало равно _____.

(16)

 
Структурированные типы данных. Массивы

Описание массивов

Задание_5_8_1 (6)

С В программе объявлен массив Matrix следующим образом

 

Var Matrix: array[2..7, 0..5] Of Byte;

 

Количество строк в массиве равно _____.

(6)

Формирование массивов (Одномерных)

Задание_5_8_2 (10)

A Данный алгоритм

For i := 1 To 10 do

A[i]:=10 - i + 1;

For i := 1 To 4 do

begin

p:= A[i];

A[i]:= A[10 - i + 1];

A[10 - i + 1]:= p;

end;

формирует массив A: array [1..10] of integer; следующего вида:

 

1) (10, 9, 8, 7, 6, 5, 4, 3, 2, 1)

2) (1, 2, 3, 4, 5, 6, 7, 8, 9, 10)

3) (10, 9, 3, 4, 5, 6, 7, 8, 2, 1)

4) (1, 2, 3, 4, 6, 5, 7, 8, 9, 10)

5) (1, 9, 8, 7, 6, 5, 4, 3, 2, 10)

(4)

Формирование массивов (Двумерных)

Задание_5_8_3 (6)

A После выполнения фрагмента программы

For i := 1 To 5 do

For j := 1 To 5 do

If i >= j Then A[i, j] := i - j

Else A[i, j] := j – i;

 

формируется матрица A: array [1..5,1..5] of integer; вида

 

1)						2)						3)
4)						5)

(5)

Обработка массивов

Задание_5_8_4 (8)

A В заданном фрагменте алгоритма обработки массива

Matrix: array[1..10,1..10] of real

 

S := 0;

For a := 1 To 7 do

S := S + Matrix[1, a];

 

определяется сумма элементов, расположенных

 

1) Во всех ячейках матрицы

2) На главной диагонали матрицы

3) На побочной диагонали матрицы

4) В первом столбце матрицы

5) В первой строке матрицы

(5)

Задание_5_8_5 (9)

A В алгоритме обработки массива

A: array [1..100] of integer;

 

S := 0; j:=3;

while j<=n do

begin

If J Mod 2 = 0 Then S := S + A[J];

j:=j+3;

end;

определяется

 

1) Сумма элементов массива c индексами кратными 2

2) Сумма элементов массива с индексами кратными 3

3) Сумма элементов массива с индексами кратными 4

4) Сумма элементов массива с индексами кратными 6

5) Сумма элементов массива с индексами кратными 12

(4)

Задание_5_8_6 (4)

A В алгоритме, определяющем количество отрицательных элементов

массива A[1 .. N],

 

S := 0;

For J := 1 To N do

If _______ Then S := S + 1;

S := N - S;

пропущен фрагмент

 

1) A[J] > S

2) A[J] >= 0

3) A[J] <= S

4) A[J] < 0

5) A[J] > J

(2)

 

Задание_5_8_7 (6)

А В алгоритме, определяющем сумму элементов, расположенных на побочной диагонали массива M: array [1..10,1..10] of integer;

 

S := 0;

For k := 1 To 10 do

S := S + M[k, ___];

 

пропущен фрагмент

 

1) k

2) 10 - k

3) 11 - k

4) 2 * (k + 1)

5) 2 * k

(3)

 

Задание_5_8_8 (4)

A В данном алгоритме обработки массива A[1 .. N], который содержит

повторяющиеся элементы

 

M := 1; T := A[1];

For J := 1 To N do

If A[j] >= T then

begin

M := J; T := A[j];

end;

значение переменной M соответствует:

 

1) Индексу первого максимального элемента массива

2) Индексу последнего максимального элемента массива

3) Индексу первого минимального элемента массива

4) Индексу последнего минимального элемента массива

(2)

 

Задание_5_8_9 (9)

С Дан фрагмент программы, обрабатывающий массив A, который описан как

A: array[1..10] of integer;

 

Y:=A[1];

For k:= 1 To 10 Do

If A[k] > Y Then Y:=A[k];

 

Значения элементов массива: (2, 12, 0, -3, 10, -3, -5, 7, 21, 0).

После окончания работы значение переменной Y равно ___.

(21)

 





Задание_5_8_10 (6)

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

 

Y := 0;

For N:= 1 to 5 do

For M := 1 to 5 do

If N < M Then Y := Y + A[N, M];

 

в котором обрабатывается массив A:

 



 

После окончания работы значение переменной Y равно ___.

(15)

 

Задание_5_8_11 (6)

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

 

Y := 0;

For N := 1 to 4 do

begin

X := A[N, 1];

For M := 1 to 4 do

If A[N, M] > X Then X := A[N, M];

Y := Y + X;

end;

в котором обрабатывается массив целых чисел A:

 



 

После окончания работы значение переменной Y равно ___.

(21)

 

Преобразование массивов

Задание_5_8_12 (5)

A Данный алгоритм обработки массива

A: array[1..N] of integer;

 

For I := 1 To N div 2 do

begin

Z := A[I];

A[I] := A[N - I + 1];

A[N - I + 1] := Z;

end;

1) Переставляет элементы массива в обратном порядке

2) Меняет местами первый и последний элементы массива

3) Циклически сдвигает элементы массива на одну позицию влево

4) Циклически сдвигает элементы массива на одну позицию вправо

5) Оставляет содержимое массива неизменным

(1)

 

Задание_5_8_13 (4)

A В программе, копирующей массив А[1 .. 4, 1 .. 6] по строкам

в массив В[1 .. 24]

 

For K := 1 To 4 do

For L := 1 To 6 do

B[_________]:=A[K,L];

пропущен фрагмент

 

1) 6 * (L - 1) + K

2) 6 * K + L

3) 6 * (K + 1) + L

4) 6 * (K + 1) + 4*(L - 1)

5) 6 * (K - 1) + L

(5)

Задание_5_9_1 (7)

A После выполнения фрагмента программы

 

S := 0; P := 1; F := 1;

For k:=0 To N Do

Begin

S := S + P * (k + 1) / F;

P := - P;

F := F * (k + 1);

End;

 

переменная S будет содержать величину:

 

1) 

2) 

3) 

4) 

5) 

 

(3)

 





Структурированные типы данных. Строки

Задание_5_10_1 (7)

A После выполнения фрагмента программы

 

S := 'fbh hyu hjk i';

while pos ('h', S) <> 0 do

delete (S, pos ('h', S), 1);

 

переменная S примет значение

1) ’fbhhyuhjki’

2) ’fb yu jk i’

3) ’fbyujki’

4) ' '

5) ’fb yu hjki’

 

(2)

A Задан массив строк, состоящий из элементов

a[1] = ’ABC’, a[2] = ’abcd’,

a[3] = ’Abc’, a[4] = ’ABCD’, a[5] = ’Abcd’.

После выполнения фрагмента программы

 

for i := 1 to 4 do

for j := i + 1 to 5 do

if a[ i ] < a[ j ] then

begin c := a[ i ];

a[ i ] := a[ j ];

a[ j ] := c;

end;

элемент а[2] равен

 

1) ’ABC’ 2) ’abcd’ 3) ’Abc’ 4) ’abcd’ 5) ’Abcd’

(5)

 

A После выполнения фрагмента программы

 

S := 'fbh hyu hjk i';

while pos (copy(s,3,1), S) <> 0 do

delete (S, pos (copy(s,3,1), S), 1);

 

переменная S примет значение

 

1) 'fb'

2) 'fb hyu hjk i'

3) 'fb yu hjk i'

4) ' '

5) 'fb yu jk i'

 

(1)

 

A После выполнения фрагмента программы

 

S := 'fbh hyu hjk i';

insert(copy(s,5,3),s,pos(copy(s,length(s),1),s));

 

переменная S примет значение

1) 'fbh hyu hyu hjk i'

2) 'fbh hyuhyu hjk i'

3) 'fbh hyu hjk hyui'

4) 'fbh hyu hjk hyu i'

5) 'fbh hyu hjk ihyu'

(3)

Структурированные типы данных. Файлы

Задание_5_11_1 (10)

A Укажите соответствие между названием процедуры работы с текстовыми файлами и ее назначением (Var F : TextFile;)

А. AssignFile(F,’N_1’)	1. Создает новый файл и открывает его на запись
B. Rewrite(F)	2. Устанавливает соответствие между файловой переменной и именем файла на диске
C. Readln(F, N_1)	3. Открывает файл для дозаписи
D. Append(F)	4. Считывает из файла значение в переменную N_1 и переходит к новой строке

 

1) A – 2, B – 1, C – 4, D – 3

2) A – 1, B – 2, C – 3, D – 4

3) A – 3, B – 1, C – 4, D – 2

4) A – 2, B – 4, C – 1, D – 3

 

(1)

A Алгоритм чтения из текстового файла массива A[1..3, 1..3] содержит блоки

 

A.	AssignFile(F,’A’);
B.	for i:=1 to 3 do
C.	end;
D.	Read(F,A[i,j]);
E.	Readln(F);
F.	for j:=1 to 3 do
G.	CloseFile(F);
H.	Begin
I.	Reset(F);

 

в следующем порядке

 

1) A H F D E I B C G

2) A E F D H I G C B

3) H F D E I A G C B

4) A H F D E I G B C

5) A I B H F D E C G

 

(5)

Процедуры и функции

Событийные

Задание_5_12_1 (6)

С Дан код программы

 

var

Form1: TForm1;

x,y:byte;

implementation

 

{$R *.dfm}

 

procedure TForm1.Button1Click(Sender: TObject);

begin

X := X + 1;

Y := Y + 2;

end;

 

procedure TForm1.Button2Click(Sender: TObject);

begin

X := X + 2;

Y := Y + 1;

end;

 

procedure TForm1.Button3Click(Sender: TObject);

begin

X := 1;

Y := 2;

end;

 

procedure TForm1.Button4Click(Sender: TObject);

begin

Edit1.Text:= inttostr(X + Y);

end;

после последовательного нажатия кнопок Button3, Button1, Button2, Button4 на форму будет выведено ____.

(9)

 

Пользовательские

Вызов процедур и функций. Фактические параметры и формальные параметры

Задание_5_12_2 (7)

А Представлена процедура

 

procedure S(x, y : integer; var d : integer);

Begin

whilex <> ydo

ifx > y then x := x – y else y := y – x;

d := x ;

end;

 

После выполнения в основной программе операторов

 

a := 98; b := 42;

S(a, b, x);

x := a + b + x;

 

значение переменной x равно

 

1) 42 2) 126 3) 154 4) 70 5) 14

 

(3)

 

Задание_5_12_3 (5)

С Дан код программы

 

Function F(a,b,c:byte):byte;

begin

if (a > b) and (a > c) then

F:=a

else

If b > c then F:=b else F:=c;

end;

 

procedure TForm1.Button1Click(Sender: TObject);

var

x,y,z,d: byte;

begin

x:=8;

y:=2*x - 7;

z:=x + y - 11;

d:=F(y,x,z);

edit1.Text:= inttostr(d);

end;

после нажатия кнопки Button1на форму будет выведено ____.

(9)

Задание_5_12_4 (4)

В В программе описаны переменные и процедура

 

var u, v, x, y : integer;

procedure A(u, v : integer; var x, y : integer);

 

Из представленных операторов вызова процедур

 

1) A(x, y, u, v);

2) A(x+1, y*5, u, v);

3) A(5, u, x, v);

4) A(x, v, u, y-1);

5) A(x, y, u, 4);

 

допустимо использовать

 

(1, 2, 3)

Правила локализации переменных

Задание_5_12_4 (6)

А Дан код программы

 

procedure A(u, v : integer; var y : integer);

var x : integer;

begin

y := u + v;

x := y - 5;

u := x * 2;

end;

 

procedure TForm1.Button1Click(Sender: TObject);

var u, v, x, y : integer ;

begin

x := 4; y := 2;

A(x, y, u);

end;

 

После выполнения событийной процедуры переменные примут значения

 

1)	u = 6	2)	u = 6	3)	u = 2	4)	u = 4	5)	u = 6
	v = 2		v = 0		v = 0		v = 0		v = 2
	x = 1		x = 4		x = 1		x = 4		x = 4
	y = 4		y = 2		y = 6		y = 2		y = 4

 

(2)

 

 

Рекурсивные функции

С Задана функция пользователя

 

Function F(n:byte):byte;

begin

if (n = 1) then F:=1

else F:=n*F(n-2);

end;

 

Значение f(5) равно

(15)