Вопрос задан 30.06.2023 в 23:58. Предмет Информатика. Спрашивает Григорьев Михаил.

Помогите пожалуйста!!!!! К завтрашнему дню надо!!! 1)В таблице Ball хранятся отметки по

контрольной работе (Ball[1] − отметка 1 ученика, Ball[2] − отметка 2 ученика и т.д.). Определите, что будет напечатано в результате работы следующего алгоритма. var k, c: integer; Ball:array[1..10] of integer; begin c := 0; Ball[1] := 4; Ball[2] := 5; Ball[3] := 3; Ball[4] := 4; Ball[5] := 2; Ball[6] := 5; Ball[7] := 4; Ball[8] := 3; Ball[9] := 4; Ball[10] := 5; for k := 1 to 10 do if Ball[k] >4 then c := c + 1; write(c); end. 2)В таблице Dat хранятся данные ежедневных измерений температуры воздуха (Dat[1] − температура в понедельник, Dat[2] − во вторник и т.д.). Определите, что будет напечатано в результате выполнения следующего алгоритма. var Dat: array[1..7] of integer; k, day: 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 day := day + 1; writeln(day); end. 3)В таблице Dat хранятся данные измерений среднесуточной температуры за 10 дней в градусах (Dat[1] — данные за первый день, Dat[2] — за второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Var k, m: integer; Dat: array[1..10] of integer; Begin Dat[1] := 2; Dat[2] := 5; Dat[3] := 7; Dat[4] := 5; Dat[5] := 4; Dat[6] := 2; Dat[7] := 0; Dat[8] := 2; Dat[9] := 4; Dat[10] := 5; m := 0; for k := 1 to 10 do if Dat[k] > 3 then m := m + 1; writeln(m); End.
0 0
Перейти к ответам

Ответы на вопрос

Внимание! Ответы на вопросы дают живые люди. Они могут содержать ошибочную информацию, заблуждения, а также ответы могут быть сгенерированы нейросетями. Будьте внимательны. Если вы уверены, что ответ неверный, нажмите кнопку "Пожаловаться" под ответом.
Отвечает Гасымов Адалет.

Ответ:

1) 3

2) 4

3) 6

(ограничение в двадцать символов, поэтому пишу эту строку, не обращай внимания)

0 0
Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.

Конечно, я помогу разобрать каждый из этих алгоритмов.

  1. В данном алгоритме происходит подсчет количества отметок, которые больше 4. Для этого создается счетчик c, который инициализируется нулем. Затем в цикле for перебираются элементы массива Ball, и если значение элемента больше 4, то счетчик увеличивается на 1. В конце алгоритма выводится значение счетчика c.

Исходные данные: Ball = [4, 5, 3, 4, 2, 5, 4, 3, 4, 5]

Проходы цикла:

  • k = 1: Ball[1] = 4 (не больше 4)
  • k = 2: Ball[2] = 5 (больше 4, c = 1)
  • k = 3: Ball[3] = 3 (не больше 4)
  • ...
  • k = 10: Ball[10] = 5 (больше 4, c = 3)

Итоговый вывод: 3

  1. В этом алгоритме происходит подсчет дней, когда температура воздуха была менее или равной 10 градусам. Создается переменная day, которая инициализируется нулем. Затем в цикле for перебираются элементы массива Dat, и если значение элемента меньше или равно 10, то значение переменной day увеличивается на 1. В конце алгоритма выводится значение переменной day.

Исходные данные: Dat = [9, 11, 10, 13, 8, 5, 11]

Проходы цикла:

  • k = 1: Dat[1] = 9 (меньше 10, day = 1)
  • k = 2: Dat[2] = 11 (не меньше 10)
  • k = 3: Dat[3] = 10 (меньше 10, day = 2)
  • ...
  • k = 7: Dat[7] = 11 (не меньше 10)

Итоговый вывод: 2

  1. В данном алгоритме происходит подсчет количества дней, когда среднесуточная температура была больше 3 градусов. Создается переменная m, которая инициализируется нулем. Затем в цикле for перебираются элементы массива Dat, и если значение элемента больше 3, то значение переменной m увеличивается на 1. В конце алгоритма выводится значение переменной m.

Исходные данные: Dat = [2, 5, 7, 5, 4, 2, 0, 2, 4, 5]

Проходы цикла:

  • k = 1: Dat[1] = 2 (не больше 3)
  • k = 2: Dat[2] = 5 (больше 3, m = 1)
  • k = 3: Dat[3] = 7 (больше 3, m = 2)
  • ...
  • k = 10: Dat[10] = 5 (больше 3, m = 6)

Итоговый вывод: 6

0 0

Похожие вопросы

Топ вопросов за вчера в категории Информатика

Последние заданные вопросы в категории Информатика

Задать вопрос