Задания
Версия для печати и копирования в MS Word
Тип Д9 № 5964
i

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

Бей­сикPython

DIM Dat(7) AS INTEGER

DIM k, day AS INTEGER

Dat(1) = 9: Dat(2) = 11

Dat(3) = 10: Dat(4) = 13

Dat(5) = 8: Dat(6) = 5

Dat(7) = 11

day = 0

FOR k = 1 TO 7

IF Dat(k) <= 10 THEN

day = day + 1

ENDIF

NEXT k

PRINT day

Dat = [9, 11, 10, 13, 8, 5, 11]

day = 0

for k in range(7):

    if Dat[k] <= 10:

        day = day + 1

print (day)

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

Var k, day: integer;

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

Begin

   Dat[1] := 9; Dat[2] := 11;

   Dat[3] := 10; Dat[4] := 13;

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

   Dat[7] := 11;

   day := 0;

   for k := 1 to 7 do

     if Dat[k] <= 10 then

      begin

        day := day + 1;

      end;

   writeln(day);

End.

   алг

   нач

   цел­таб Dat[1:7]

   цел k, day

   Dat[1] := 9

   Dat[2] := 11

   Dat[3] := 10

   Dat[4] := 13

   Dat[5] := 8

   Dat[6] := 5

   Dat[7] := 11

   day := 0

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

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

         day := day + 1

      все

   кц

   вывод day

   кон

С++

#include <iostream>

using namespace std;

int main() {

    int Dat[7] = {9, 11, 10, 13, 8, 5, 11};

    int day = 0;

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

        if (Dat[k] <= 10) day = day + 1;

    cout << day;

    return 0;

}

Спрятать решение

Ре­ше­ние.

Про­грам­ма пред­на­зна­че­на для на­хож­де­ния ко­ли­че­ства дней, в ко­то­рые тем­пе­ра­ту­ра воз­ду­ха была не боль­ше 10. Про­ана­ли­зи­ро­вав вход­ные дан­ные, при­хо­дим к вы­во­ду, что ответ 4.

 

Ответ: 4.


Аналоги к заданию № 5964: 6115 6184 Все