информатика
сайты - меню - вход - новости




Задания
Версия для печати и копирования в MS Word
Задание 10 № 1061

В таб­ли­це A хра­нят­ся дан­ные о ко­ли­че­стве призёров олим­пи­а­ды по про­грам­ми­ро­ва­нию по де­вя­ти окру­гам Москвы. Определите, что будет на­пе­ча­та­но в ре­зуль­та­те вы­пол­не­ния сле­ду­ю­ще­го алгоритма, за­пи­сан­но­го на пяти язы­ках программирования.

 

БейсикPython

DIM A(9) AS INTEGER

DIM k, score AS INTEGER

A(1) = 6: A(2) = 11

A(3) = 7: A(4) = 12

A(5) = 13: A(6) = 5

A(7) = 9: A(8) = 3

A(9) = 4

score = 0

FOR k = 1 TO 9

IF A(k) >= 9 THEN

score = score + A(k)

ENDIF

NEXT k

PRINT score

A = [6, 11, 7, 12, 13, 5, 9, 3, 4]

score = 0

for k in range (9):

    if A[k] >= 9:

        score = score + A[k]

print (score)

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

Var k, score: integer;

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

Begin

   A[1]:=6;A[2]:=11;

   A[3]:=7;A[4]:=12;

   A[5]:=13;A[6]:=5;

   A[7]:=9;A[8]:=3;

   A[9]:=4;

   score := 0;

   for k := 1 to 9 do

      if A[k] >= 9 then

       begin

          score := score + A[k];

       end;

   writeln(score);

End.

  алг

  нач

   цел­таб A[1:9]

   цел k, score

   A[1] := 6

   A[2] := 11

   A[3] := 7

   A[4] := 12

   A[5] := 13

   A[6] := 5

   A[7] := 9

   A[8] := 3

   A[9] := 4

   score := 0

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

       если A[k] >= 9 то

           score := score + A[k]

       все

   кц

   вывод score

кон

С++

#include <iostream>

using namespace std;

int main() {

    int A[9] = {6, 11, 7, 12, 13, 5, 9, 3, 4};

    int score = 0;

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

        if (A[k] >= 9) score = score + A[k];

    cout << score;

    return 0;

}

 

Пояснение.

Программа пред­на­зна­че­на для опре­де­ле­ния сум­мар­но­го ко­ли­че­ства призёров в тех округах, в ко­то­рых призёров не менее девяти. Это ко­ли­че­ство равно 11 + 12 + 13 + 9 = 45.

 

Ответ: 45.