Меню
Разработки
Сведения об образовательной организации
Регистрация
Разработки  /  Информатика  /  Проверочные работы  /  9 класс  /  Проверочная работа на тему: "Массивы". Подготовка к ГИА.

Проверочная работа на тему: "Массивы". Подготовка к ГИА.

Проверочная работа на тему: "Массивы". Подготовка к ГИА. В подборку входят 12 заданий для работы с учениками перед проверочной работой, проверочная работа из 4-х вариантов.

06.12.2017

Содержимое разработки

Подборка заданий по теме «Массивы» для подготовки к ГИА

Ответ: 41

№1 В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] заданий сделал первый ученик, Dat[2] – второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.

Алгоритмический язык

Бейсик

алг
нач
  целтаб Dat[1:11]
  цел  k, m
  Dat[1] := 20; Dat[2] := 25
  Dat[3] := 15; Dat[4] := 25
  Dat[5] := 26; Dat[6] := 22
  Dat[7] := 24; Dat[8] := 28
  Dat[9] := 26; Dat[10] := 21
  Dat[11] := 27
  m := 30
  нц для k от 1 до 11
    если Dat[k]      m := Dat[k]
    все
  кц
  вывод m
кон

DIM Dat(11) AS INTEGER
DIM k,m AS INTEGER
Dat(1) = 20: Dat(2) = 25
Dat(3) = 15: Dat(4) = 25
Dat(5) = 26: Dat(6) = 22
Dat(7) = 24: Dat(8) = 28
Dat(9) = 26: Dat(10) = 21
Dat(11) = 27
m = 30 
FOR k = 1 TO 11
IF Dat(k) m = Dat(k)
END IF
NEXT k
PRINT m

Паскаль

Var k, m: integer;
 Dat: array[1..11] of integer;
Begin
  Dat[1] := 20;  Dat[2] := 25;
  Dat[3] := 15;  Dat[4] := 25;
  Dat[5] := 26;  Dat[6] := 22;
  Dat[7] := 24;  Dat[8] := 28;
  Dat[9] := 26;  Dat[10] := 21;
  Dat[11] := 27;
  m := 30;
  for k := 1  to 11 do
    if  Dat[k]       begin
        m := Dat[k]
      end;
  writeln(m)
End.

Отв: 15

№2 В таблице Dat хранятся данные о количестве учеников в классах (Dat[1] – количество учеников в первом классе, Dat[2] – во втором и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.

Алгоритмический язык

Бейсик

алг
нач
  целтаб Dat[1:11]
  цел  k, m
  Dat[1] := 20; Dat[2] := 25
  Dat[3] := 19; Dat[4] := 25
  Dat[5] := 26; Dat[6] := 22
  Dat[7] := 24; Dat[8] := 28
  Dat[9] := 26; Dat[10] := 21
  Dat[11] := 27
  m := 0
  нц для k от 1 до 11
    если Dat[k]      m := m + 1
    все
  кц
  вывод m
кон

DIM Dat(11) AS INTEGER
DIM k,m AS INTEGER
Dat(1) = 20: Dat(2) = 25
Dat(3) = 19: Dat(4) = 25
Dat(5) = 26: Dat(6) = 22
Dat(7) = 24: Dat(8) = 28
Dat(9) = 26: Dat(10) = 21
Dat(11) = 27
m = 0 
FOR k = 1 TO 11
IF Dat(k) m = m + 1
END IF
NEXT k
PRINT m

Паскаль

Var k, m: integer;
 Dat: array[1..11] of integer;
Begin
  Dat[1] := 20;  Dat[2] := 25;
  Dat[3] := 19;  Dat[4] := 25;
  Dat[5] := 26;  Dat[6] := 22;
  Dat[7] := 24;  Dat[8] := 28;
  Dat[9] := 26;  Dat[10] := 21;
  Dat[11] := 27;
  m := 0;
  for k := 1  to 11 do
    if  Dat[k] 22then
      begin
        m := m + 1
      end;
  writeln(m)
End.

Отв: 3

№3 В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] заданий сделал первый ученик, Dat[2] – второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.

Алгоритмический язык

Бейсик

алг
нач
  целтаб Dat[1:10]
  цел  k, m, n
  Dat[1] := 7; Dat[2] := 9
  Dat[3] := 10; Dat[4] := 5
  Dat[5] := 6; Dat[6] := 10
  Dat[7] := 9; Dat[8] := 7
  Dat[9] := 6; Dat[10] := 9
  m := 0 ; n := 0
  нц для k от 1 до 10
    если Dat[k] = m  то
      m := Dat[k]
      n := k
    все
  кц
  вывод n
кон

DIM Dat(10) AS INTEGER
DIM k, m, n AS INTEGER
Dat(1) = 7:  Dat(2) = 9
Dat(3) = 10: Dat(4) = 5
Dat(5) = 6:  Dat(6) = 10
Dat(7) = 9:  Dat(8) = 7
Dat(9) = 6:  Dat(10) = 9
m = 0 : n =0
FOR k = 1 TO 10
IF Dat(k) = m THEN
m = Dat(k)
n = k
END IF
NEXT k
PRINT n

Паскаль

Var k, m, n: integer;
Dat: array[1..10] of integer;
Begin
  Dat[1] := 7;  Dat[2] := 9;
  Dat[3] := 10; Dat[4] := 5;
  Dat[5] := 6;  Dat[6] := 10;
  Dat[7] := 9;  Dat[8] := 7;
  Dat[9] := 6;  Dat[10] := 9;
  m := 0; n := 0;
  for k := 1  to 10 do
    if  Dat[k] = m then
      begin
        m := Dat[k]; n := k
      end;
  writeln(n)
End.



Отв: 6 (номер того, кто сделал больше)


№4 В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] заданий сделал первый ученик, Dat[2] – второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.

Алгоритмический язык

Бейсик

алг
нач
  целтаб Dat[1:10]
  цел  k, m
  Dat[1] := 7; Dat[2] := 9
  Dat[3] := 12; Dat[4] := 5
  Dat[5] := 6; Dat[6] := 7
  Dat[7] := 9; Dat[8] := 8
  Dat[9] := 6; Dat[10] := 9
  m := 0
  нц для k от 1 до 10
    если Dat[k]  m  то
     m := Dat[k]
    все
  кц
  вывод m
кон

DIM Dat(10) AS INTEGER
DIM k,m AS INTEGER
Dat(1) = 7:  Dat(2) = 9
Dat(3) = 12: Dat(4) = 5
Dat(5) = 6:  Dat(6) = 7
Dat(7) = 9:  Dat(8) = 8
Dat(9) = 6:  Dat(10) = 9
m = 0 
FOR k = 1 TO 10
IF Dat(k) m THEN
m = Dat(k)
END IF
NEXT k
PRINT m

Паскаль

Var k, m: integer;
 Dat: array[1..10] of integer;
Begin
  Dat[1] := 7;  Dat[2] := 9;
  Dat[3] := 12; Dat[4] := 5;
  Dat[5] := 6;  Dat[6] := 7;
  Dat[7] := 9;  Dat[8] := 8;
  Dat[9] := 6;  Dat[10] := 9;
  m := 0;
  for k := 1  to 10 do
    if  Dat[k] m then
      begin
        m := Dat[k]
      end;
  writeln(m)
End.




Отв: 12(макс число заданий)


№5 В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] заданий сделал первый ученик, Dat[2] – второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.

Алгоритмический язык

Бейсик

алг
нач
  целтаб Dat[1:10]
  цел  k, m, n
  Dat[1] := 7; Dat[2] := 9
  Dat[3] := 10; Dat[4] := 4
  Dat[5] := 6; Dat[6] := 7
  Dat[7] := 8; Dat[8] := 8
  Dat[9] := 4; Dat[10] := 9
  m := 10; n := 0
  нц для k от 1 до 10
    если Dat[k]       m := Dat[k]
      n := k
    все
  кц
  вывод n
кон

DIM Dat(10) AS INTEGER
DIM k, m, n AS INTEGER
Dat(1) = 7:  Dat(2) = 9
Dat(3) = 10: Dat(4) = 4
Dat(5) = 6:  Dat(6) = 7
Dat(7) = 8:  Dat(8) = 8
Dat(9) = 4:  Dat(10) = 9
m = 10 : n = 0
FOR k = 1 TO 10
IF Dat(k) m = Dat(k)
n = k
END IF
NEXT k
PRINT n

Паскаль

Var k, m, n: integer;
Dat: array[1..10] of integer;
Begin
  Dat[1] := 7;  Dat[2] := 9;
  Dat[3] := 10; Dat[4] := 4;
  Dat[5] := 6;  Dat[6] := 7;
  Dat[7] := 8;  Dat[8] := 8;
  Dat[9] := 4;  Dat[10] := 9;
  m := 10; n := 0;
  for k := 1  to 10 do
    if  Dat[k]       begin
        m := Dat[k]; n := k
      end;
  writeln(n)
End.


Отв:9 (номер того, кто сделал меньше)

№6 В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] заданий сделал первый ученик, Dat[2] – второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.

Алгоритмический язык

Бейсик

алг
нач
  целтаб Dat[1:10]
  цел  k, m
  Dat[1] := 7; Dat[2] := 9
  Dat[3] := 10; Dat[4] := 5
  Dat[5] := 6; Dat[6] := 7
  Dat[7] := 9; Dat[8] := 8
  Dat[9] := 6; Dat[10] := 9
  m := 0
  нц для k от 1 до 10
    если Dat[k]      m := m + 1
    все
  кц
  вывод m
кон

DIM Dat(10) AS INTEGER
DIM k,m AS INTEGER
Dat(1) = 7:  Dat(2) = 9
Dat(3) = 10: Dat(4) = 5
Dat(5) = 6:  Dat(6) = 7
Dat(7) = 9:  Dat(8) = 8
Dat(9) = 6:  Dat(10) = 9
m = 0 
FOR k = 1 TO 10
IF Dat(k) m = m + 1
END IF
NEXT k
PRINT m

Паскаль

Var k, m: integer;
 Dat: array[1..10] of integer;
Begin
  Dat[1] := 7;  Dat[2] := 9;
  Dat[3] := 10; Dat[4] := 5;
  Dat[5] := 6;  Dat[6] := 7;
  Dat[7] := 9;  Dat[8] := 8;
  Dat[9] := 6;  Dat[10] := 9;
  m := 0;
  for k := 1  to 10 do
    if  Dat[k]       begin
        m := m + 1
      end;
  writeln(m)
End.

Отв: 5 ( Ск. Человек сделало заданий меньше 8)

№7 В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] заданий сделал первый ученик, Dat[2] – второй и т.д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.

Алгоритмический язык

Бейсик

алг
нач
  целтаб Dat[1:10]
  цел  k, m
  Dat[1] := 7; Dat[2] := 9
  Dat[3] := 10; Dat[4] := 5
  Dat[5] := 6; Dat[6] := 7
  Dat[7] := 9; Dat[8] := 8
  Dat[9] := 6; Dat[10] := 9
  m := 0
  нц для k от 1 до 10
    если Dat[k] 7  то
     m := m + 1
    все
  кц
  вывод m
кон

DIM Dat(10) AS INTEGER
DIM k,m AS INTEGER
Dat(1) = 7:  Dat(2) = 9
Dat(3) = 10: Dat(4) = 5
Dat(5) = 6:  Dat(6) = 7
Dat(7) = 9:  Dat(8) = 8
Dat(9) = 6:  Dat(10) = 9
m = 0 
FOR k = 1 TO 10
IF Dat(k) 7 THEN
m = m+1
END IF
NEXT k
PRINT m

Паскаль

Var k, m: integer;
 Dat: array[1..10] of integer;
Begin
  Dat[1] := 7;  Dat[2] := 9;
  Dat[3] := 10; Dat[4] := 5;
  Dat[5] := 6;  Dat[6] := 7;
  Dat[7] := 9;  Dat[8] := 8;
  Dat[9] := 6;  Dat[10] := 9;
  m := 0;
  for k := 1  to 10 do
    if  Dat[k] 7 then
      m := m + 1;
  writeln(m)
End.

Отв: 5 ( Ск. человек сделало заданий больше 7)

№8 В таблице Dat хранятся данные о количестве учеников в классах (Dat[1] – количество учеников в первом классе, Dat[2] – во втором и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.

Алгоритмический язык

Бейсик

алг
нач
  целтаб Dat[1:11]
  цел  k, m
  Dat[1] := 20; Dat[2] := 25
  Dat[3] := 19; Dat[4] := 25
  Dat[5] := 26; Dat[6] := 22
  Dat[7] := 24; Dat[8] := 28
  Dat[9] := 26; Dat[10] := 21
  Dat[11] := 27
  m := 0
  нц для k от 1 до 11
    если Dat[k]      m := m + 1
    все
  кц
  вывод m
кон

DIM Dat(11) AS INTEGER
DIM k,m AS INTEGER
Dat(1) = 20: Dat(2) = 25
Dat(3) = 19: Dat(4) = 25
Dat(5) = 26: Dat(6) = 22
Dat(7) = 24: Dat(8) = 28
Dat(9) = 26: Dat(10) = 21
Dat(11) = 27
m = 0 
FOR k = 1 TO 11
IF Dat(k) m = m + 1
END IF
NEXT k
PRINT m

Паскаль

Var k, m: integer;
 Dat: array[1..11] of integer;
Begin
  Dat[1] := 20;  Dat[2] := 25;
  Dat[3] := 19;  Dat[4] := 25;
  Dat[5] := 26;  Dat[6] := 22;
  Dat[7] := 24;  Dat[8] := 28;
  Dat[9] := 26;  Dat[10] := 21;
  Dat[11] := 27;
  m := 0;
  for k := 1  to 11 do
    if  Dat[k]       begin
        m := m + 1
      end;
  writeln(m)
End.

Отв: 7 (Сколько классов численностью )

№9 В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] заданий сделал первый ученик, Dat[2] – второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.

Алгоритмический язык

Бейсик

алг
нач
  целтаб Dat[1:11]
  цел  k, m
  Dat[1] := 20; Dat[2] := 25
  Dat[3] := 19; Dat[4] := 25
  Dat[5] := 26; Dat[6] := 22
  Dat[7] := 24; Dat[8] := 28
  Dat[9] := 26; Dat[10] := 21
  Dat[11] := 27
  m := 30
  нц для k от 1 до 11
    если Dat[k]      m := Dat[k]
    все
  кц
  вывод m
кон

DIM Dat(11) AS INTEGER
DIM k,m AS INTEGER
Dat(1) = 20: Dat(2) = 25
Dat(3) = 19: Dat(4) = 25
Dat(5) = 26: Dat(6) = 22
Dat(7) = 24: Dat(8) = 28
Dat(9) = 26: Dat(10) = 21
Dat(11) = 27
m = 30 
FOR k = 1 TO 11
IF Dat(k) m = Dat(k)
END IF
NEXT k
PRINT m

Паскаль

Var k, m: integer;
 Dat: array[1..11] of integer;
Begin
  Dat[1] := 20;  Dat[2] := 25;
  Dat[3] := 19;  Dat[4] := 25;
  Dat[5] := 26;  Dat[6] := 22;
  Dat[7] := 24;  Dat[8] := 28;
  Dat[9] := 26;  Dat[10] := 21;
  Dat[11] := 27;
  m := 30;
  for k := 1  to 11 do
    if  Dat[k]       begin
        m := Dat[k]
      end;
  writeln(m)
End.

ОТв: 19

№10 В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] заданий сделал первый ученик, Dat[2] – второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.

Алгоритмический язык

Бейсик

алг
нач
  целтаб Dat[1:11]
  цел  k, m
  Dat[1] := 20; Dat[2] := 25
  Dat[3] := 19; Dat[4] := 25
  Dat[5] := 26; Dat[6] := 22
  Dat[7] := 24; Dat[8] := 28
  Dat[9] := 26; Dat[10] := 21
  Dat[11] := 27
  m := 0
  нц для k от 1 до 11
    если k  9  то
     m := m + Dat[k]
    все
  кц
  вывод m
кон

DIM Dat(11) AS INTEGER
DIM k,m AS INTEGER
Dat(1) = 20: Dat(2) = 25
Dat(3) = 19: Dat(4) = 25
Dat(5) = 26: Dat(6) = 22
Dat(7) = 24: Dat(8) = 28
Dat(9) = 26: Dat(10) = 21
Dat(11) = 27
m = 0 
FOR k = 1 TO 11
IF k 9 THEN
m = m + Dat(k)
END IF
NEXT k
PRINT m

Паскаль

Var k, m: integer;
 Dat: array[1..11] of integer;
Begin
  Dat[1] := 20;  Dat[2] := 25;
  Dat[3] := 19;  Dat[4] := 25;
  Dat[5] := 26;  Dat[6] := 22;
  Dat[7] := 24;  Dat[8] := 28;
  Dat[9] := 26;  Dat[10] := 21;
  Dat[11] := 27;
  m := 0;
  for k := 1  to 11 do
    if  k 9 then
      begin
        m := m + Dat[k]
      end;
  writeln(m)
End.


Отв: 48 (Сумма заданий у которых номер больше 9 )

№11 В таблице Dat хранятся данные о количестве учеников в классах (Dat[1] – количество учеников в первом классе, Dat[2] – во втором и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.

Алгоритмический язык

Бейсик

алг
нач
  целтаб Dat[1:11]
  цел  k, m
  Dat[1] := 20; Dat[2] := 25
  Dat[3] := 19; Dat[4] := 25
  Dat[5] := 26; Dat[6] := 22
  Dat[7] := 24; Dat[8] := 28
  Dat[9] := 26; Dat[10] := 21
  Dat[11] := 27
  m := 0
  нц для k от 1 до 11
    если Dat[k] = 25  то
     m := m + 1
    все
  кц
  вывод m
кон

DIM Dat(11) AS INTEGER
DIM k,m AS INTEGER
Dat(1) = 20: Dat(2) = 25
Dat(3) = 19: Dat(4) = 25
Dat(5) = 26: Dat(6) = 22
Dat(7) = 24: Dat(8) = 28
Dat(9) = 26: Dat(10) = 21
Dat(11) = 27
m = 0 
FOR k = 1 TO 11
IF Dat(k) = 25 THEN
m = m + 1
END IF
NEXT k
PRINT m

Паскаль

Var k, m: integer;
 Dat: array[1..11] of integer;
Begin
  Dat[1] := 20;  Dat[2] := 25;
  Dat[3] := 19;  Dat[4] := 25;
  Dat[5] := 26;  Dat[6] := 22;
  Dat[7] := 24;  Dat[8] := 28;
  Dat[9] := 26;  Dat[10] := 21;
  Dat[11] := 27;
  m := 0;
  for k := 1  to 11 do
    if  Dat[k] = 25 then
      begin
        m := m + 1
      end;
  writeln(m)
End.

Отв: 6 (Число классов с кол-вом уч-в больше или равных 25)



Содержимое разработки

Подборка заданий по теме «Массивы» для подготовки к ГИА Вариант -1

Var k, m: integer;
 Dat: array[1..11] of integer;
Begin
  Dat[1] := 20;  Dat[2] := 25;
  Dat[3] := 19;  Dat[4] := 25;
  Dat[5] := 26;  Dat[6] := 22;
  Dat[7] := 24;  Dat[8] := 28;
  Dat[9] := 26;  Dat[10] := 21;
  Dat[11] := 27;
  m := 30;
  for k := 1  to 11 do
    if  Dat[k]       begin
        m := Dat[k]
      end;
  writeln(m)
End.

№1 В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] заданий сделал первый ученик, Dat[2] – второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.









Var k, m: integer;
 Dat: array[1..11] of integer;
Begin
  Dat[1] := 20;  Dat[2] := 25;
  Dat[3] := 19;  Dat[4] := 25;
  Dat[5] := 26;  Dat[6] := 22;
  Dat[7] := 24;  Dat[8] := 28;
  Dat[9] := 26;  Dat[10] := 21;
  Dat[11] := 27;
  m := 0;
  for k := 1  to 11 do
    if  Dat[k]       begin
        m := m + 1
      end;
  writeln(m)
End.

№2В таблице Dat хранятся данные о количестве учеников в классах (Dat[1] – количество учеников в первом классе, Dat[2] – во втором и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.










Var k, m, n: integer;
Dat: array[1..10] of integer;
Begin
  Dat[1] := 7;  Dat[2] := 9;
  Dat[3] := 10; Dat[4] := 5;
  Dat[5] := 6;  Dat[6] := 7;
  Dat[7] := 9;  Dat[8] := 10;
  Dat[9] := 6;  Dat[10] := 9;
  m := 0; n := 0;
  for k := 1  to 10 do
    if  Dat[k] = m then
      begin
        m := Dat[k]; n := k
      end;
  writeln(n)
End.

№3

В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] заданий сделал первый ученик, Dat[2] – второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.






Подборка заданий по теме «Массивы» для подготовки к ГИА Вариант -2

Var k, m: integer;
 Dat: array[1..10] of integer;
Begin
  Dat[1] := 7;  Dat[2] := 9;
  Dat[3] := 10; Dat[4] := 5;
  Dat[5] := 6;  Dat[6] := 7;
  Dat[7] := 9;  Dat[8] := 8;
  Dat[9] := 6;  Dat[10] := 9;
  m := 0;
  for k := 1  to 10 do
    if  Dat[k] m then
      begin
        m := Dat[k]
      end;
  writeln(m)
End.

№4

В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] заданий сделал первый ученик, Dat[2] – второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.










Паскаль


Var k, m, n: integer;
Dat: array[1..10] of integer;
Begin
  Dat[1] := 7;  Dat[2] := 9;
  Dat[3] := 10; Dat[4] := 5;
  Dat[5] := 6;  Dat[6] := 7;
  Dat[7] := 5;  Dat[8] := 8;
  Dat[9] := 6;  Dat[10] := 9;
  m := 10; n := 0;
  for k := 1  to 10 do
    if  Dat[k]       begin
        m := Dat[k]; n := k
      end;
  writeln(n)
End.

№5

В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] заданий сделал первый ученик, Dat[2] – второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.









Var k, m: integer;
 Dat: array[1..10] of integer;
Begin
  Dat[1] := 7;  Dat[2] := 9;
  Dat[3] := 10; Dat[4] := 5;
  Dat[5] := 6;  Dat[6] := 7;
  Dat[7] := 9;  Dat[8] := 8;
  Dat[9] := 6;  Dat[10] := 9;
  m := 0;
  for k := 1  to 10 do
    if  Dat[k]       begin
        m := m + 1
      end;
  writeln(m)
End.

№6

В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] заданий сделал первый ученик, Dat[2] – второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.






Подборка заданий по теме «Массивы» для подготовки к ГИА Вариант -3

Var k, m: integer;
 Dat: array[1..10] of integer;
Begin
  Dat[1] := 7;  Dat[2] := 9;
  Dat[3] := 10; Dat[4] := 5;
  Dat[5] := 6;  Dat[6] := 7;
  Dat[7] := 9;  Dat[8] := 8;
  Dat[9] := 6;  Dat[10] := 9;
  m := 0;
  for k := 1  to 10 do
    if  Dat[k] 6 then
      m := m + 1;
  writeln(m)
End.

№7

В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] заданий сделал первый ученик, Dat[2] – второй и т.д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.








Var k, m: integer;
 Dat: array[1..11] of integer;
Begin
  Dat[1] := 20;  Dat[2] := 25;
  Dat[3] := 19;  Dat[4] := 25;
  Dat[5] := 26;  Dat[6] := 22;
  Dat[7] := 24;  Dat[8] := 28;
  Dat[9] := 26;  Dat[10] := 21;
  Dat[11] := 27;
  m := 0;
  for k := 1  to 11 do
    if  Dat[k]       begin
        m := m + 1
      end;
  writeln(m)
End.

№8

В таблице Dat хранятся данные о количестве учеников в классах (Dat[1] – количество учеников в первом классе, Dat[2] – во втором и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.








Var k, m: integer;
 Dat: array[1..11] of integer;
Begin
  Dat[1] := 20;  Dat[2] := 25;
  Dat[3] := 19;  Dat[4] := 25;
  Dat[5] := 26;  Dat[6] := 22;
  Dat[7] := 24;  Dat[8] := 28;
  Dat[9] := 26;  Dat[10] := 21;
  Dat[11] := 27;
  m := 30;
  for k := 1  to 11 do
    if  Dat[k]       begin
        m := Dat[k]
      end;
  writeln(m)
End.

№9

В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] заданий сделал первый ученик, Dat[2] – второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования



Подборка заданий по теме «Массивы» для подготовки к ГИА Вариант -4

Var k, m: integer;
 Dat: array[1..11] of integer;
Begin
  Dat[1] := 20;  Dat[2] := 25;
  Dat[3] := 19;  Dat[4] := 25;
  Dat[5] := 26;  Dat[6] := 22;
  Dat[7] := 24;  Dat[8] := 28;
  Dat[9] := 26;  Dat[10] := 21;
  Dat[11] := 27;
  m := 0;
  for k := 1  to 11 do
    if  k 9 then
      begin
        m := m + Dat[k]
      end;
  writeln(m)
End.

№10

В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] заданий сделал первый ученик, Dat[2] – второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.










Var k, m: integer;
 Dat: array[1..11] of integer;
Begin
  Dat[1] := 20;  Dat[2] := 25;
  Dat[3] := 19;  Dat[4] := 25;
  Dat[5] := 26;  Dat[6] := 22;
  Dat[7] := 24;  Dat[8] := 28;
  Dat[9] := 26;  Dat[10] := 21;
  Dat[11] := 27;
  m := 0;
  for k := 1  to 11 do
    if  Dat[k] = 25 then
      begin
        m := m + 1
      end;
  writeln(m)
End.

№11

В таблице Dat хранятся данные о количестве учеников в классах (Dat[1] – количество учеников в первом классе, Dat[2] – во втором и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.












12

Содержимое разработки

Подборка заданий по теме «Массивы» для подготовки к ГИА Вариант -1

Var k, m: integer;
 Dat: array[1..11] of integer;
Begin
  Dat[1] := 20;  Dat[2] := 25;
  Dat[3] := 19;  Dat[4] := 25;
  Dat[5] := 26;  Dat[6] := 22;
  Dat[7] := 24;  Dat[8] := 28;
  Dat[9] := 26;  Dat[10] := 21;
  Dat[11] := 27;
  m := 30;
  for k := 1  to 11 do
    if  Dat[k]       begin
        m := Dat[k]
      end;
  writeln(m)
End.

№1 В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] заданий сделал первый ученик, Dat[2] – второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.








Отв: 19

Var k, m: integer;
 Dat: array[1..11] of integer;
Begin
  Dat[1] := 20;  Dat[2] := 25;
  Dat[3] := 19;  Dat[4] := 25;
  Dat[5] := 26;  Dat[6] := 22;
  Dat[7] := 24;  Dat[8] := 28;
  Dat[9] := 26;  Dat[10] := 21;
  Dat[11] := 27;
  m := 0;
  for k := 1  to 11 do
    if  Dat[k]       begin
        m := m + 1
      end;
  writeln(m)
End.

№2В таблице Dat хранятся данные о количестве учеников в классах (Dat[1] – количество учеников в первом классе, Dat[2] – во втором и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.








Отв: 5

Var k, m, n: integer;
Dat: array[1..10] of integer;
Begin
  Dat[1] := 7;  Dat[2] := 9;
  Dat[3] := 10; Dat[4] := 5;
  Dat[5] := 6;  Dat[6] := 7;
  Dat[7] := 9;  Dat[8] := 10;
  Dat[9] := 6;  Dat[10] := 9;
  m := 0; n := 0;
  for k := 1  to 10 do
    if  Dat[k] = m then
      begin
        m := Dat[k]; n := k
      end;
  writeln(n)
End.

№3

В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] заданий сделал первый ученик, Dat[2] – второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.






Отв: 8 (номер того, кто сделал больше)

Подборка заданий по теме «Массивы» для подготовки к ГИА Вариант -2

Var k, m: integer;
 Dat: array[1..10] of integer;
Begin
  Dat[1] := 7;  Dat[2] := 9;
  Dat[3] := 10; Dat[4] := 5;
  Dat[5] := 6;  Dat[6] := 7;
  Dat[7] := 9;  Dat[8] := 8;
  Dat[9] := 6;  Dat[10] := 9;
  m := 0;
  for k := 1  to 10 do
    if  Dat[k] m then
      begin
        m := Dat[k]
      end;
  writeln(m)
End.

№4

В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] заданий сделал первый ученик, Dat[2] – второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.








Отв: 10 (макс число заданий)

Паскаль


Var k, m, n: integer;
Dat: array[1..10] of integer;
Begin
  Dat[1] := 7;  Dat[2] := 9;
  Dat[3] := 10; Dat[4] := 5;
  Dat[5] := 6;  Dat[6] := 7;
  Dat[7] := 5;  Dat[8] := 8;
  Dat[9] := 6;  Dat[10] := 9;
  m := 10; n := 0;
  for k := 1  to 10 do
    if  Dat[k]       begin
        m := Dat[k]; n := k
      end;
  writeln(n)
End.

№5

В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] заданий сделал первый ученик, Dat[2] – второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.







Отв: 7 (номер того, кто сделал меньше

Var k, m: integer;
 Dat: array[1..10] of integer;
Begin
  Dat[1] := 7;  Dat[2] := 9;
  Dat[3] := 10; Dat[4] := 5;
  Dat[5] := 6;  Dat[6] := 7;
  Dat[7] := 9;  Dat[8] := 8;
  Dat[9] := 6;  Dat[10] := 9;
  m := 0;
  for k := 1  to 10 do
    if  Dat[k]       begin
        m := m + 1
      end;
  writeln(m)
End.

№6

В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] заданий сделал первый ученик, Dat[2] – второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.






Отв: 3

Подборка заданий по теме «Массивы» для подготовки к ГИА Вариант -3

Var k, m: integer;
 Dat: array[1..10] of integer;
Begin
  Dat[1] := 7;  Dat[2] := 9;
  Dat[3] := 10; Dat[4] := 5;
  Dat[5] := 6;  Dat[6] := 7;
  Dat[7] := 9;  Dat[8] := 8;
  Dat[9] := 6;  Dat[10] := 9;
  m := 0;
  for k := 1  to 10 do
    if  Dat[k] 6 then
      m := m + 1;
  writeln(m)
End.

№7

В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] заданий сделал первый ученик, Dat[2] – второй и т.д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.






Отв: 7

Var k, m: integer;
 Dat: array[1..11] of integer;
Begin
  Dat[1] := 20;  Dat[2] := 25;
  Dat[3] := 19;  Dat[4] := 25;
  Dat[5] := 26;  Dat[6] := 22;
  Dat[7] := 24;  Dat[8] := 28;
  Dat[9] := 26;  Dat[10] := 21;
  Dat[11] := 27;
  m := 0;
  for k := 1  to 11 do
    if  Dat[k]       begin
        m := m + 1
      end;
  writeln(m)
End.

№8

В таблице Dat хранятся данные о количестве учеников в классах (Dat[1] – количество учеников в первом классе, Dat[2] – во втором и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.








Отв: 5

Var k, m: integer;
 Dat: array[1..11] of integer;
Begin
  Dat[1] := 20;  Dat[2] := 25;
  Dat[3] := 19;  Dat[4] := 25;
  Dat[5] := 26;  Dat[6] := 22;
  Dat[7] := 24;  Dat[8] := 28;
  Dat[9] := 26;  Dat[10] := 21;
  Dat[11] := 27;
  m := 30;
  for k := 1  to 11 do
    if  Dat[k]       begin
        m := Dat[k]
      end;
  writeln(m)
End.

№9

В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] заданий сделал первый ученик, Dat[2] – второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования

ОТв: 19



Подборка заданий по теме «Массивы» для подготовки к ГИА Вариант -4

Var k, m: integer;
 Dat: array[1..11] of integer;
Begin
  Dat[1] := 20;  Dat[2] := 25;
  Dat[3] := 19;  Dat[4] := 25;
  Dat[5] := 26;  Dat[6] := 22;
  Dat[7] := 24;  Dat[8] := 28;
  Dat[9] := 26;  Dat[10] := 21;
  Dat[11] := 27;
  m := 0;
  for k := 1  to 11 do
    if  k 9 then
      begin
        m := m + Dat[k]
      end;
  writeln(m)
End.

№10

В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] заданий сделал первый ученик, Dat[2] – второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.








Отв: 48 (Сумма заданий у которых номер больше 9 )

Var k, m: integer;
 Dat: array[1..11] of integer;
Begin
  Dat[1] := 20;  Dat[2] := 25;
  Dat[3] := 19;  Dat[4] := 25;
  Dat[5] := 26;  Dat[6] := 22;
  Dat[7] := 24;  Dat[8] := 28;
  Dat[9] := 26;  Dat[10] := 21;
  Dat[11] := 27;
  m := 0;
  for k := 1  to 11 do
    if  Dat[k] = 25 then
      begin
        m := m + 1
      end;
  writeln(m)
End.

№11

В таблице Dat хранятся данные о количестве учеников в классах (Dat[1] – количество учеников в первом классе, Dat[2] – во втором и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.












Отв: 6 (Число классов с кол-вом уч-в больше или равных 25)

12

Отв:41

-80%
Курсы повышения квалификации

Внедрение современных педагогических технологий в условиях реализации ФГОС (в предметной области «Информатика»)

Продолжительность 72 часа
Документ: Удостоверение о повышении квалификации
4000 руб.
800 руб.
Подробнее

Получите комплекты видеоуроков + онлайн версии

Информационная безопасность

Электронная тетрадь по информатике 6...

Информатика 3 класс

Информатика 10 класс (Россия)

Основы алгоритмизации и...

Информатика 11 класс ФГОС

Электронная тетрадь по информатике 5...

Видеоуроки по информатике 6 класс (к...

Скачать разработку
Сохранить у себя:
Проверочная работа на тему: "Массивы". Подготовка к ГИА. (721.04 KB)

Похожие файлы

Комментарии 0

Чтобы добавить комментарий зарегистрируйтесь или на сайт

Вы смотрели