СДАМ ГИА: РЕШУ ОГЭ
Образовательный портал для подготовки к экзаменам
Информатика
информатика
сайты - меню - вход - новости


Вариант № 5951034

При выполнении заданий с кратким ответом впишите в поле для ответа цифру, которая соответствует номеру правильного ответа, или число, слово, последовательность букв (слов) или цифр. Ответ следует записывать без пробелов и каких-либо дополнительных символов. Дробную часть отделяйте от целой десятичной запятой. Единицы измерений писать не нужно.


Если вариант задан учителем, вы можете вписать или загрузить в систему ответы к заданиям с развернутым ответом. Учитель увидит результаты выполнения заданий с кратким ответом и сможет оценить загруженные ответы к заданиям с развернутым ответом. Выставленные учителем баллы отобразятся в вашей статистике.


Версия для печати и копирования в MS Word
Времени прошло:0:00:00
Времени осталось:1.0:00:00
1
Задания Д9 № 10

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

 

БейсикPython

DIM Dat(10) AS INTEGER

DIM k,m AS INTEGER

Dat(1) = 12: Dat(2) = 15

Dat(3) = 17: Dat(4) = 15

Dat(5) = 14: Dat(6) = 12

Dat(7) = 10: Dat(8) = 13

Dat(9) = 14: Dat(10) = 15

m = 0

FOR k = 1 TO 10

IF Dat(k) = 15 THEN

m = m + 1

ENDIF

NEXT k

PRINT m

Dat = [12, 15, 17, 15, 14, 12, 10, 13, 14, 15]

m = 0

for k in range (10):

    if Dat[k] == 15:

        m = m + 1

print (m)

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

Var k, m: integer;

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

Begin

   Dat[1] := 12; Dat[2] := 15;

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

   Dat[5] := 14; Dat[6] := 12;

   Dat[7] := 10; Dat[8] := 13;

   Dat[9] := 14; Dat[10] := 15;

   m := 0;

   for k := 1 to 10 do

      if Dat[k]=15 then

       begin

          m := m + 1;

       end;

   writeln(m);

End.

  алг

нач

   целтаб Dat[1:10]

   цел k, m

   Dat[1] := 12

   Dat[2] := 15

   Dat[3] := 17

   Dat[4] := 15

   Dat[5] := 14

   Dat[6] := 12

   Dat[7] := 10

   Dat[8] := 13

   Dat[9] := 14

   Dat[10] := 15

   m := 0

   нц для k от 1 до 10

       если Dat[k]=15 то

           m := m + 1

       все

   кц

   вывод m

кон

С++

#include <iostream>

using namespace std;

int main() {

    int Dat[10] = {12, 15, 17, 15, 14, 12, 10, 13, 14, 15};

    int m = 0;

    for (int k = 0; k < 10; k++)

        if (Dat[k] == 15) m = m + 1;

    cout << m;

    return 0;

}

 


Ответ:

2
Задания Д9 № 30

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

 

БейсикPython

DIM Dat(10) AS INTEGER

DIM k,m AS INTEGER

Dat(1) = 12: Dat(2) = 15

Dat(3) = 17: Dat(4) = 15

Dat(5) = 14: Dat(6) = 12

Dat(7) = 10: Dat(8) = 13

Dat(9) = 14: Dat(10) = 15

m = 0

FOR k = 1 TO 10

IF Dat(k) > m THEN

m = Dat(k)

ENDIF

NEXT k

PRINT m

Dat = [12, 15, 17, 15, 14, 12, 10, 13, 14, 15]

m = 0

for k in range (10):

    if Dat[k] > m:

        m = Dat[k]

print (m)

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

Var k, m: integer;

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

Begin

   Dat[1] := 12; Dat[2] := 15;

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

   Dat[5] := 14; Dat[6] := 12;

   Dat[7] := 10; Dat[8] := 13;

   Dat[9] := 14; Dat[10] := 15;

   m := 0;

   for k := 1 to 10 do

      if Dat[k] > m then

       begin

          m := Dat[k];

       end;

   writeln(m);

End.

  алг

нач

   целтаб Dat[1:10]

   цел k, m

   Dat[1] := 12

   Dat[2] := 15

   Dat[3] := 17

   Dat[4] := 15

   Dat[5] := 14

   Dat[6] := 12

   Dat[7] := 10

   Dat[8] := 13

   Dat[9] := 14

   Dat[10] := 15

   m := 0

   нц для k от 1 до 10

       если Dat[k] > m то

           m := Dat[k]

       все

   кц

   вывод m

кон

С++

#include <iostream>

using namespace std;

int main() {

    int Dat[10] = {12, 15, 17, 15, 14, 12, 10, 13, 14, 15};

    int m = 0;

    for (int k = 0; k < 10; k++)

        if (Dat[k] > m) m = Dat[k];

    cout << m;

    return 0;

}

 


Ответ:

3
Задания Д9 № 70

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

 

БейсикPython

DIM Dat(10) AS INTEGER

DIM k,m AS INTEGER

Dat(1) = 12: Dat(2) = 15

Dat(3) = 17: Dat(4) = 15

Dat(5) = 14: Dat(6) = 12

Dat(7) = 10: Dat(8) = 13

Dat(9) = 14: Dat(10) = 15

m = 0

FOR k = 1 TO 10

IF Dat(k) > 12 THEN

m = m + 1

ENDIF

NEXT k

PRINT m

Dat = [12, 15, 17, 15, 14, 12, 10, 13, 14, 15]

m = 0

for k in range (10):

    if Dat[k] > 12:

        m = m + 1

print (m)

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

Var k, m: integer;

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

Begin

   Dat[1] := 12; Dat[2] := 15;

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

   Dat[5] := 14; Dat[6] := 12;

   Dat[7] := 10; Dat[8] := 13;

   Dat[9] := 14; Dat[10] := 15;

   m := 0;

   for k := 1 to 10 do

      if Dat[k] > 12 then

       begin

          m := m + 1;

       end;

   writeln(m);

End.

   алг

   нач

   целтаб Dat[1:10]

   цел k, m

   Dat[1] := 12

   Dat[2] := 15

   Dat[3] := 17

   Dat[4] := 15

   Dat[5] := 14

   Dat[6] := 12

   Dat[7] := 10

   Dat[8] := 13

   Dat[9] := 14

   Dat[10] := 15

   m := 0

   нц для k от 1 до 10

       если Dat[k] > 12 то

           m := m + 1

       все

   кц

   вывод m

   кон

С++

#include <iostream>

using namespace std;

int main() {

    int Dat[10] = {12, 15, 17, 15, 14, 12, 10, 13, 14, 15};

    int m = 0;

    for (int k = 0; k < 10; k++)

        if (Dat[k] > 12) m = m + 1;

    cout << m;

    return 0;

}

 


Ответ:

4
Задания Д9 № 391

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

 

БейсикPython

DIM Dat(12) AS INTEGER

DIM k, m, month AS INTEGER

Dat(1) = 5: Dat(2) = 5

Dat(3) = 6: Dat(4) = 8

Dat(5) = 4: Dat(6) = 5

Dat(7) = 4: Dat(8) = 7

Dat(9) = 4: Dat(10) = 4

Dat(11) = 8: Dat(12) = 7

m = Dat(1); month = 1

FOR k = 2 TO 12

IF Dat(k) <= m THEN

m = Dat(k)

month = k

ENDIF

NEXT k

PRINT month

Dat = [5, 5, 6, 8, 4, 5, 4, 7, 4, 4, 8, 7]

m = Dat[0]

month = 1

for k in range(1, 12):

    if Dat[k] <= m:

        m = Dat[k]

        month = k + 1

print (month)

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

Var k, m, month: integer;

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

Begin

   Dat[1] := 5; Dat[2] := 5;

   Dat[3] := 6; Dat[4] := 8;

   Dat[5] := 4; Dat[6] := 5;

   Dat[7] := 4; Dat[8] := 7;

   Dat[9] := 4; Dat[10] := 4;

   Dat[11] := 8; Dat[12] := 7;

   m := Dat[1];

   month := 1;

   for k := 2 to 12 do

      if Dat[k] <= m then

       begin

          m := Dat[k];

          month := k;

       end;

   writeln(month);

End.

   алг

   нач

   целтаб Dat[1:12]

   цел k, m, month

   Dat[1] := 5

   Dat[2] := 5

   Dat[3] := 6

   Dat[4] := 8

   Dat[5] := 4

   Dat[6] := 5

   Dat[7] := 4

   Dat[8] := 7

   Dat[9] := 4

   Dat[10] := 4

   Dat[11] := 8

   Dat[12] := 7

   m := Dat[1]

   month := 1

   нц для k от 2 до 12

       если Dat[k] <= m то

           m := Dat[k]

           month := k

       все

   кц

   вывод month

   кон

С++

#include <iostream>

using namespace std;

int main() {

    int Dat[12] = {5, 5, 6, 8, 4, 5, 4, 7, 4, 4, 8, 7};

    int m = Dat[0];

    int month = 1;

    for (int k = 1; k < 12; k++)

        if (Dat[k] <= m) {

            m = Dat[k];

            month = k + 1;

        }

    cout << month;

    return 0;

}

 


Ответ:

5
Задания Д9 № 591

В таблице Tur хранятся данные о количестве ребят, ходивших в поход вместе с туристическим клубом «Полянка». (Tur[1] — число ребят в 2001 году, Tur[2] — в 2002 году и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования:

 

БейсикPython

DIM Tur(11) AS INTEGER

DIM k,m AS INTEGER

Tur(1) = 1: Tur(2) = 11

Tur(3) = 8: Tur(4) = 12

Tur(5) = 5: Tur(6) = 6

Tur(7) = 15: Tur(8) = 16

Tur(9) = 16: Tur(10) = 21

Tur(11) = 7

m = 0

FOR k = 1 TO 11

IF Tur(k) < 10 THEN

m = m + Tur(k)

ENDIF

NEXT k

PRINT m

Tur = [1, 11, 8, 12, 5, 6, 15, 16, 16, 21, 7]

m = 0

for k in range(11):

    if Tur[k] < 10:

        m = m + Tur[k]

print (m)

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

Var k, m: integer;

Tur: array[1..11] of integer;

Begin

 Tur[1]:=1; Tur[2]:=11;

 Tur[3]:=8; Tur[4]:=12;

 Tur[5]:=5; Tur[6]:=6;

 Tur[7]:=15; Tur[8]:=16;

 Tur[9]:=16; Tur[10]:=21;

 Tur[11]:=7;

 m := 0;

 for k := 1 to 11 do

    if Tur[k] < 10 then

     begin

        m := m + Tur[k];

     end;

writeln(m);

End.

   алг

   нач

   целтаб Tur[1:11]

   цел k, m

   Tur[1] := 1

   Tur[2] := 11

   Tur[3] := 8

   Tur[4] := 12

   Tur[5] := 5

   Tur[6] := 6

   Tur[7] := 15

   Tur[8] := 16

   Tur[9] := 16

   Tur[10] := 21

   Tur[11] := 7

   m := 0

   нц для k от 1 до 11

       если Tur[k] < 10 то

           m := m + Tur[k]

       все

   кц

   вывод m

   кон

С++

#include <iostream>

using namespace std;

int main() {

    int Tur[11] = {1, 11, 8, 12, 5, 6, 15, 16, 16, 21, 7};

    int m = 0;

    for (int k = 0; k < 11; k++)

        if (Tur[k] < 10) m = m + Tur[k];

    cout << m;

    return 0;

}

 


Ответ:
Времени прошло:0:00:00
Времени осталось:1.0:00:00
Завершить тестирование, свериться с ответами, увидеть решения.