Контрольная работа по информатике "Программное управление с работой компьютера" (9 класс)

КР2  Программное управление с работой компьютера

Вариант 1

1.         Определите значение переменной b после выполнения алгоритма:

    a:= 1

    b:= 4

    a:= 2*a+3*b

    b:= a/2*b

    В ответе укажите одно целое число – значение переменной b.

2.              Определите значение переменной «a» после выполнения фрагмента

    программы:

      a:= 10;

      if a < 5 then

        a:= 5;

3.         Определите, что будет напечатано в результате работы следующей

    программы.

    var s, k:integer;

    begin

      s:= 0;

      for k := 2 to 12 do

        s:= s + 11;

      writeln (s);

    end.

4.         В таблице 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]:= 7;

      m := 0;

      for k := 1 to 10 do

        if Dat[k] < 8 then begin

          m:= m + 1

        end;

      writeln(m)

    End.

5.       Составить программу, которая запрашивает пароль (трёхзначное число) до тех пор, пока он не будет правильно введён.

КР 2 Программное управление с работой компьютера

Вариант 2

1.    Определите значение переменной а после выполнения данного

    алгоритма:

    a:= 4

    b:= 9

    b:= 6 * b – a

    a:= b / 5 * 3 – a

    В ответе укажите одно целое число – значение переменной а.

2.       Определите значение переменной «a» после выполнения фрагмента

    программы:

      a:= 10;

      if a > 5 then

        a:= 12;

3.         Определите, что будет напечатано в результате работы следующей

    программы.

    var s, k:integer;

    begin

      s:= 100;

      for k:= 0 to 10 do

        s:= s - 5;

      writeln (s);

    end.

4.              В таблице Dat хранятся данные ежедневных измерений количества

    осадков за неделю в миллиметрах (Dat[1] – данные за понедельник,

    Dat[2] – за вторник и т.д.). Определите, что будет напечатано в

    результате выполнения

    следующего алгоритма.

    var k, day: integer;

        Dat: array[1..7] of integer;

    begin

      Dat[1]:= 14; Dat[2]:= 10;

      Dat[3]:= 0;  Dat[4] := 15;

      Dat[5]:= 0;  Dat[6] := 15;

      Dat[7]:= 10;

      day := 0;

      for k := 1 to 7 do

        if Dat[k] = 0 then

          day := k;

      write(day);

    end.

5.  Составить на языке Паскаль программу, которая запрашивает с клавиатуры N целых чисел и считает, сколько из них положительных, сколько отрицательных и сколько нулей. Разработать для программы не менее двух тестов и доказать правильность её работы.

Краткое описание документа:

Данная контрольная работа предназначена для проверки знания учащихся по теме "Программное управление с работой компьютера", информатика 9 класс. Работа составлена, в двух вариантах. С первого по четвертое задание подобраны из коллекции примерных заданий ОГЭ по информатике. Пятое задание для практического выполнения.