Question

10 баллов тому,кто решит . В таблице Sea хранятся данные о количестве россиян, отдыхавших на Чёрном море (Sea[l] - число россиян в 2001 году, Sea[2] - в 2002 и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Var k, s: integer; Sea: array[1..12] of integer; Begin Sea[1] := 170; Sea [2] := 170; Sea [3] := 190; Sea [4] := 210; Sea [5] := 230; Sea [6] := 220; Sea [7] := 240; Sea [8] := 160; Sea [9] := 190; Sea [10] := 210; Sea [11] := 170; Sea [12] :=170; s := 100; For k := 1 to 12 do If Sea [k] > 220 Then Begin s := s + Sea [k]; End; Writeln(s); End. Ответ:

Answer 1

Заметим, что есть условие, проверяющее, является ли какой-нибудь элемент массива Sea больше 220. Сразу же откидываем все элементы, которые меньше 220: 1, 2, 3, 4, 6 (поскольку 220 не больше 220, а равно), 8, 9, 10, 11, 12. Остаются элементы 5 и 7. После того, как оператор (то, что проверяется) в условии равен истине, выполняется увеличение переменной s на величину элемента массива. У нас прошло через условие лишь два элемента, поэтому, к существующей переменной s, равной 1 мы добавляем 230 (5-й элемент) и 240 (7-й элемент) и получаем:

100 + 230 + 240 = 570

Ответ

570

Answer 2

Давайте выполним программу по шагам и посчитаем результат.

Изначально, у нас есть массив Sea, содержащий данные о количестве россиян, отдыхавших на Чёрном море в разные годы.

cssCopy code
Sea[1] := 170;
Sea[2] := 170;
Sea[3] := 190;
Sea[4] := 210;
Sea[5] := 230;
Sea[6] := 220;
Sea[7] := 240;
Sea[8] := 160;
Sea[9] := 190;
Sea[10] := 210;
Sea[11] := 170;
Sea[12] := 170;

Затем у нас есть переменные k и s, где s инициализируется значением 100.

cssCopy code
Var k, s: integer;
s := 100;

Затем запускается цикл for, который перебирает элементы массива Sea.

vbnetCopy code
For k := 1 to 12 do

Для каждого элемента массива Sea проверяется, превышает ли он значение 220.

cssCopy code
If Sea[k] > 220 Then

Если элемент массива превышает 220, то его значение прибавляется к переменной s.

cssCopy code
s := s + Sea[k];

Итак, давайте проверим элементы массива Sea:

scssCopy code
Sea[1] = 170 -> Не выполняется условие (170 <= 220)
Sea[2] = 170 -> Не выполняется условие (170 <= 220)
Sea[3] = 190 -> Не выполняется условие (190 <= 220)
Sea[4] = 210 -> Не выполняется условие (210 <= 220)
Sea[5] = 230 -> Выполняется условие (230 > 220), s = 100 + 230 = 330
Sea[6] = 220 -> Не выполняется условие (220 <= 220)
Sea[7] = 240 -> Выполняется условие (240 > 220), s = 330 + 240 = 570
Sea[8] = 160 -> Не выполняется условие (160 <= 220)
Sea[9] = 190 -> Не выполняется условие (190 <= 220)
Sea[10] = 210 -> Не выполняется условие (210 <= 220)
Sea[11] = 170 -> Не выполняется условие (170 <= 220)
Sea[12] = 170 -> Не выполняется условие (170 <= 220)

Таким образом, после выполнения программы, она выведет значение переменной s, которое равно 570.

Ответ: 570