Предложенный электронный тест позволяет педагогу определить уровень теоретических знаний. Методический материал имеет достаточно обобщенный характер, и педагог, желающий внедрить их в работу, без труда сможет внести соответствующие изменения и использовать по назначению.
Материал разработан на современном уровне. При внедрении его в работу педагог может внести необходимые коррективы и использовать в своей деятельности.
Тест составлялся в рамках работ над созданием Государственного образовательного стандарта и может использоваться в учебном процессе для оценки знаний учащихся по разделам информатики при изучении базового курса информатики.
Циклический алгоритм обработки массива
Предмет
Информатика
9
Информатика. 9 класс. Босова Л.Л., Босова А.Ю. М.: 2013. — 184 с.
Тестовые задания для самоконтроля
Класс
Учебник
Тема
Вопрос №1
В таблице Dat хранятся данные о количестве проданных единиц товаров 10 типов (Dat[1] — проданных
товаров первого типа, Dat[2] — второго типа и т.д.). Определите, что будет напечатано в результате
выполнения следующего алгоритма.
of integer;
45; Dat[2]:= 55;
40; Dat[4]:= 15;
20; Dat[6]:= 80;
35; Dat[8]:= 70;
10; Dat[10]: = 45;
Dat[1]:=
Dat[3]:=
Dat[5]:=
Dat[7]:=
Dat[9]:=
m:= Dat [1];
var k, m: integer;
Dat: array[1..10]
begin
for k:= 4 to 10 do begin
if Dat[k] <= Dat[l] then
end
end;
write (m);
end.
begin
m:= m + Dat [k]
Вопрос №2
В таблице Dat хранятся данные о количестве проданных единиц товаров 10 типов (Dat[1] — проданных
товаров первого типа, Dat[2] — второго типа и т.д.). Определите, что будет напечатано в результате
выполнения следующего алгоритма.
var k, m, day: integer;
Dat: array[1..10] of integer;
begin
7; Dat [2] := 1;
3; Dat [4] := 3;
2; Dat [6] := 2;
Dat [1] :=
Dat [3] :=
Dat [5] :=5; Dat [8] := 5;
7; Dat [10] := 1;
1; m:= Dat[l];
begin
Dat [7] :=
Dat [9] :=
day:=
for k:= 2 to 10 do begin
if Dat[k] < m then
end
end;
end.
m := Dat [k];
day := k
write(day);
Вопрос №3
В массиве V хранятся данные о среднемесячной влажности за год в процентах (V[l] — данные за
январь, V[2] — за февраль и т.д.). Определите, что будет напечатано в результате выполнения
следующего алгоритма.
var k, i: integer;
V: array[1..12] of integer;
begin
V[1]:=52;
V[2]:=71;
V[3]:=88;
V[4]:=31;
V[5]:=17;
V[6]:=82;
V[7]:=74;
V[8]:=91;
V[9]:=24;
V[10]:=61;
V[11]:=50;
V[12]:=31;
k:= 0;
for i:=1 to 12 do
if (V[i]>50) and
(V[i]<80) then
k=k+1;
write(k);
end.
Вопрос №4
В таблице Dat хранятся данные о количестве проданных единиц товаров 10 типов (Dat[1] — проданных
товаров первого типа, Dat[2] — второго типа и т.д.). Определите, что будет напечатано в результате
выполнения следующего алгоритма.
var k, m, day: integer;
Dat: array[1..10] of integer;m:= Dat[1];
7; Dat[2] := 2;
3; Dat[4] := 3;
4; Dat[6] := 4;
5; Dat[8] := 5;
7; Dat[10] := 6;
Dat[1] :=
Dat[3] :=
Dat[5] :=
Dat[7] :=
Dat[9] :=
1;
begin
day:=
for k:= 2 to 10 do begin
if Dat[k] >= m then
end
end;
end.
m := Dat [k];
day := k
write(day);
begin
Вопрос №5
В таблице Dat хранятся данные о количестве проданных единиц товаров 10 типов (Dat[1] — проданных
товаров первого типа, Dat[2] — второго типа и т.д.). Определите, что будет напечатано в результате
выполнения следующего алгоритма.
Dat[1] :=
Dat[3] :=
Dat[5] :=
Dat[7] :=
Dat[9] :=
16; Dat[2] := 20;
20; Dat[4] := 41;
14; Dat[6] := 21;
28; Dat[8] := 12;
15; Dat[10] := 35;
Var k, m: integer;
Dat: array[1..10] of integer;
Begin
m := 0;
for k := 1 to 10 do
if Dat[k]>m then
end;
End.
m := Dat[k]
writeln(m);
begin
Вопрос №6
В таблице Dat хранятся положительные или отрицательные целые числа. Определите, что будет
напечатано в результате выполнения следующего алгоритма.
var k, m, num: integer;
Dat: array[1..10] of integer;
begin
Dat[1]:= 7; Dat[2]:= 8;Dat[3]:= 3; Dat[4]:= 6;
Dat[5]:= 4; Dat[6]:= 3;
Dat[7]:= 5; Dat[8]:= 5;
Dat [9] := 7; Dat[10] := 1;
num:= 1; m:= Dat[1];
for k:= 2 to 10 do begin
if Dat[k] * m < 0 then
begin
m := Dat [k]; num := k
end
end;
write(num);
end.
Вопрос №7
В таблице Dat хранятся данные о количестве проданных единиц товаров 10 типов (Dat[1] — проданных
товаров первого типа, Dat[2] — второго типа и т.д.). Определите, что будет напечатано в результате
выполнения следующего алгоритма.
of integer;
45; Dat[2]:= 55;
40; Dat[4]:= 15;
20; Dat[6]:= 80;
35; Dat[8]:= 70;
10; Dat[10]:= 45;
Dat[1]:=
Dat[3]:=
Dat[5]:=
Dat[7]:=
Dat[9]:=
m:= Dat [1];
var k, m: integer;
Dat: array[1..10]
begin
for k:= 2 to 10 do begin
if Dat[k] < Dat[1] then
end
end;
end.
m:= m + Dat [k]
begin
write(m);
Вопрос №8
В таблице Dat хранятся данные о количестве проданных единиц товаров 10 типов (Dat[1] — проданных
товаров первого типа, Dat[2] — второго типа и т.д.). Определите, что будет напечатано в результате
выполнения следующего алгоритма.
var k, m, month: integer;
Dat: array[1..12]
begin
of integer;
Dat[1] :=
2; Dat[2] := 8;Dat[3] :=
Dat[5] :=
Dat[7] :=
Dat[9] :=
Dat[11] :=
month :=
6; Dat[4] := 3;
8; Dat[6] := 2;
3; Dat[8] := 7;
8; Dat[10] := 3;
8; Dat[12] := 7;
7; m := Dat[7];
for k := 8 to 12 do begin
if Dat[k] > m then begin
end
end;
write(month);
end.
m := Dat [k];
month := k
Вопрос №9
В таблице Dat хранятся данные о количестве проданных единиц товаров 10 типов (Dat[1] — проданных
товаров первого типа, Dat[2] — второго типа и т.д.). Определите, что будет напечатано в результате
выполнения следующего алгоритма.
of integer;
45; Dat[2] := 55;
40; Dat[4] := 15;
20;. Dat[6] := 80;
35; Dat[8] := 70;
10; Dat[10] := 45;
Dat[1] :=
Dat[3] :=
Dat[5] :=
Dat[7] :=
Dat[9] :=
m:= Dat[1];
var k, m: integer;
Dat: array[1..10]
begin
for k:= 4 to 10 do begin
if Dat[k] >= Dat[1] then
end
end;
end.
begin
m:= m + Dat[k]
write(m);
Вопрос №10
В массиве Phone хранятся данные о расходах за телефон за год в рублях (Phone[l] — данные за январь,
Phone[2] — за февраль и т.д.). Определите, что будет напечатано в результате выполнения следующего
алгоритма.
var d, s, i: integer;
Phone: array[1..12]
of шnteger;
beginPhone[1]:=52;
Phone[2]:=71;
Phone[3]:=88;
Phone [4]:=31;
Phone [5]:=17;
Phone [6]:=82;
Phone [7]:=74;
Phone [8]:=91;
Phone [9]:=24;
Phone [10]:=61;
Phone [11]:=50;
Phone [12]:=31;
d:= 1; s:= Phone[1];
for i:=2 to 12 do
begin
if Phone[i] >s then
begin
s:= Phone[i]; d:=i
end
end;
write(s,d);
end.
Вопрос №11
В таблице Dat хранятся данные о количестве проданных единиц товаров 10 типов (Dat[1] — проданных
товаров первого типа, Dat[2] — второго типа и т.д.). Определите, что будет напечатано в результате
выполнения следующего алгоритма.
of integer;
begin
m := Dat [k];
month := k
Dat[1] :=
Dat[3] :=
Dat[5] : =
Dat[7] : =
Dat[9] :=
Dat[11] :=
month :=
var k, m, month: integer;
Dat: array[1.,12]
begin
2; Dat[2] := 8;
6; Dat[4] := 3;
8; Dat[6] := 2;
3; Dat[8] := 7;
4; Dat[10] := 4;
8; Dat [12] := 7;
1; m := Dat[1];
for k := 2 to 6 do begin
if Dat[k] > m then
end
end;
end.
write(month);Вопрос №12
В таблице Dat хранятся положительные или отрицательные целые числа. Определите, что будет
напечатано в результате выполнения следующего алгоритма.
var k, m, num: integer;
Dat: array[ 1.. 10 ] of integer;
begin
Dat[1] := 7; Dat[2] := 8;
Dat [ 3 ] : = 3; Dat[4] : = 6;
Dat [5] := 4; Dat[6] := 3;
Dat[7] := 5; Dat[8] := 5;
Dat [9] := 7; Dat[10] := 1;
num:= 1; m:= Dat[1];
for k:= 2 to 10 do begin
if Dat[k]* m < 0 then
begin
m := Dat [k]; num := k
end
end;
write (m);
end.
Вопрос №13
В таблице Dat хранятся данные о количестве проданных единиц товаров 10 типов (Dat[1] — проданных
товаров первого типа, Dat[2] — второго типа и т.д.). Определите, что будет напечатано в результате
выполнения следующего алгоритма.
of integer;
begin
m: = m + Dat [k]
45; Dat[2]:= 55;
40; Dat[4]:= 15;
20; Dat[6]:= 80;
35; Dat[8]:= 70;
10; Dat[10]:= 45;
Dat[1]:=
Dat[3]:=
Dat[5]:=
Dat[7]:=
Dat[9]:=
m:= Dat[1];
var k, m: integer;
Dat: array[1..10]
begin
for k:= 4 to 10 do begin
if Dat[k] > Dat[l] then
end
end;
write(m);
end.
Правильные ответы, решения к тесту:Вопрос №1
Правильный ответ — 170
Вопрос №2
Правильный ответ — 2
Вопрос №3
Правильный ответ — 4
Вопрос №4
Правильный ответ — 9
Вопрос №5
Правильный ответ — 41
Вопрос №6
Правильный ответ — 9
Вопрос №7
Правильный ответ — 165
Вопрос №8
Правильный ответ — 9
Вопрос №9
Правильный ответ — 240
Вопрос №10
Правильный ответ — 918
Вопрос №11
Правильный ответ — 2
Вопрос №12
Правильный ответ — 3
Вопрос №13Правильный ответ — 195