ГДЗ по информатике 9 класс Босова рабочая тетрадь Часть 1, 2 Часть 1 | Страница 92

Авторы:
Тип:рабочая тетрадь
Часть:1, 2

Страница 92

\[\boxed{\mathbf{Страница\ 92.}}\]

\[\boxed{\mathbf{82.}}\]

\[\mathbf{\text{program\ }}n\ \_\ 82\]

\[\text{var}\ k,\ m,\ \text{day}:\ \text{integer};\]

  Добавить текст Вернуть оригинал

\[\text{Dat}:\ \text{array}\ \lbrack 1..7\rbrack\ \text{of}\ \text{integer};\]

  Добавить текст Вернуть оригинал

\[\text{begin}\]

\[\text{~~~~~~}\ \text{Dat}\lbrack 1\rbrack\ : = \ 7;\]

  Добавить текст Вернуть оригинал

\[\text{~~~~~~}\ Dat\lbrack 2\rbrack\ ; = \ 9;\]

  Добавить текст Вернуть оригинал

\[\ \ \ \ \ \ \ Dat\lbrack 3\rbrack\ : = \ 10;\]

  Добавить текст Вернуть оригинал

\[\ \ \ \ \ \ \ Dat\lbrack 4\rbrack\ : = \ 8;\]

  Добавить текст Вернуть оригинал

\[\ \ \ \ \ \ \ Dat\lbrack 5\rbrack\ : = \ 6;\]

  Добавить текст Вернуть оригинал

\[\ \ \ \ \ \ \ Dat\lbrack 6\rbrack\ : = \ 7;\]

  Добавить текст Вернуть оригинал

\[\ \ \ \ \ \ \ Dat\lbrack 7\rbrack\ : = \ 6;\]

  Добавить текст Вернуть оригинал

\[\ \ \ \ \ \ \ day\ : = \ 1;\]

\[\ \ \ \ \ \ \ m\ : = \ Dat\lbrack 1\rbrack;\]

  Добавить текст Вернуть оригинал

\[\ \ \ \ \ \ \ for\ k\ : = \ 2\ to\ 7\ do\ begin\]

  Добавить текст Вернуть оригинал

\[\ \ \ \ \ \ \ \ \ \ \ \ if\ \ Dat\lbrack k\rbrack\ < \ m\ then\ begin\]

  Добавить текст Вернуть оригинал

\[\ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ m\ : = \ Dat\lbrack k\rbrack;\]

  Добавить текст Вернуть оригинал

\[\ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ day\ : = \ k\]

  Добавить текст Вернуть оригинал

\[\ \ \ \ \ \ \ \ \ \ \ \ end;\ end;\]

\[\text{~~~~~~\ }write\ (day)\]

\[\mathbf{\text{end}}\]

\[Ответ:\]

\[3 - количество\ дней\ с\ \]

\[температурой\ выше\ \]

\[14\ градусов.\]

\[\boxed{\mathbf{83.}}\]

\[\mathbf{Блок - схема:}\]


\[\mathbf{Программа\ на\ языке\ Паскаль:}\]

  Добавить текст Вернуть оригинал

\[{\mathbf{\text{program}}\ n\ \_\ 83; }{\text{\ \ \ \ \ }\mathbf{\text{var}}\ i,\ к,\ n,\ si,\ s2,\ s3:\ integer;}\]

  Добавить текст Вернуть оригинал

\[\ \ \ \ \ \ \ \ \ \ \ \ m:\ \mathbf{\text{array}}\ \lbrack 1..30\rbrack\ \mathbf{\text{of}}\ integer;\]

  Добавить текст Вернуть оригинал

\[\mathbf{\text{begin}}\]

\[s1: = 0;\ s2: = 0;\ s3: = 0;\]

\[\mathbf{\text{for}}\ i\ : = 1\mathbf{\text{\ to}}\ 10\ \mathbf{\text{do}}\]

  Добавить текст Вернуть оригинал

\[\text{\ \ \ }\mathbf{\text{\ \ begin}}\]

  Добавить текст Вернуть оригинал

\[\text{\ \ \ \ \ \ \ \ \ \ \ readln\ }\left( m\lbrack i\rbrack \right);\ \]

  Добавить текст Вернуть оригинал

\[\ \ \ \ \ \ \ \ \ \ \ s1: = \ s1 + m\lbrack i\rbrack;\]

  Добавить текст Вернуть оригинал

\[\text{\ \ \ \ }\mathbf{\ \ end;}\]

\[\mathbf{\text{for}}\ i\ : = 11\ \mathbf{\text{to}}\ 20\ \mathbf{\text{do}}\]

  Добавить текст Вернуть оригинал

\[\text{\ \ \ \ \ \ }\mathbf{\text{begin}}\]

  Добавить текст Вернуть оригинал

\[\text{\ \ \ \ \ \ \ \ \ \ \ \ readln\ }\left( m\lbrack i\rbrack \right);\]

  Добавить текст Вернуть оригинал

\[\ \ \ \ \ \ \ \ \ \ \ \ s2: = \ s2 + m\lbrack i\rbrack;\]

  Добавить текст Вернуть оригинал

\(\mathbf{end;}\)

\[\mathbf{\text{for}}\ i\ : = 21\ \mathbf{\text{to}}\ 30\ \mathbf{\text{do}}\]

  Добавить текст Вернуть оригинал

\[\text{\ \ \ \ \ }\mathbf{\text{begin}}\]

  Добавить текст Вернуть оригинал

\[\text{\ \ \ \ \ \ \ \ \ \ \ readln\ }\left( m\lbrack i\rbrack \right);\ \]

  Добавить текст Вернуть оригинал

\[\ \ \ \ \ \ \ \ \ \ \ s3: = \ s3 + m\lbrack i\rbrack;\]

  Добавить текст Вернуть оригинал

\[\text{\ \ \ }\mathbf{\ \ end;}\]

\[k: = \ s1;\ n: = 1;\]

\[\mathbf{\text{if\ }}к\ < \ s2\ \mathbf{\text{then}}\ \]

  Добавить текст Вернуть оригинал

\[\mathbf{\text{\ \ \ \ begin\ }}\]

\[\ \ \ \ \ \ \ \ \ к\ : = \ s2;\ n ≔ 2;\ \]

  Добавить текст Вернуть оригинал

\[\text{\ \ \ }\mathbf{\ \ end;}\]

\[\mathbf{\text{if}}\ к\ < \ s3\ \mathbf{\text{then}}\ \]

  Добавить текст Вернуть оригинал

\[\mathbf{\text{\ \ \ \ \ \ begin\ }}\]

\[\ \ \ \ \ \ \ \ \ \ \ \ к\ : = \ s3;\ n ≔ 3;\ \]

  Добавить текст Вернуть оригинал

\[\mathbf{\ \ \ \ \ \ end;}\]

\[\mathbf{\text{end.}}\]


## Часть 2

Скачать ответ
Есть ошибка? Сообщи нам!

Решебники по другим предметам