Question

В таб­ли­це Dat хра­нят­ся дан­ные из­ме­ре­ний сред­не­су­точ­ной тем­пе­ра­ту­ры за 10 дней в гра­ду­сах (Dat[1] — дан­ные за пер­вый день, Dat[2] — за вто­рой и т. д.). Определите, какое число будет на­пе­ча­та­но в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования. Алгоритмический язык Бейсик Паскаль алг нач целтаб Dat[1:10] цел k, m Dat[1] := 12 Dat[2] := 15 Dat[3] := 17 Dat[4] := 15 Dat[5] := 14 Dat[6] := 12 Dat[7] := 10 Dat[8] := 13 Dat[9] := 14 Dat[10] := 15 m := 20 нц для k от 1 до 10 если Dat[k] < m то m := Dat[k] все кц вывод m кон DIM Dat(10) AS INTEGER DIM k,m AS INTEGER Dat(1) = 12: Dat(2) = 15 Dat(3) = 17: Dat(4) = 15 Dat(5) = 14: Dat(6) = 12 Dat(7) = 10: Dat(8) = 13 Dat(9) = 14:Dat(10) = 15 m = 20 FOR k = 1 TO 10 IF Dat(k) < m THEN m = Dat(k) ENDIF NEXT k PRINT m Var k, m: integer; Dat: array[1..10] of integer; Begin Dat[1] := 12; Dat[2] := 15; Dat[3] := 17; Dat[4] := 15; Dat[5] := 14; Dat[6] := 12; Dat[7] := 10; Dat[8] := 13; Dat[9] := 14; Dat[10] := 15; m := 20; for k := 1 to 10 do if Dat[k] < m then begin m := Dat[k] end; writeln(m); End.

Answer 1

m := 20

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

 если Dat[k] < m

 то m := Dat[k]

 все кц

по этим командам должны разобраться, что в заданном массиве из десяти элементов находим минимальный элемент (он равен 10)

Answer 2

Программа выполняет следующий алгоритм:

1. Задает массив Dat с данными среднесуточной температуры за 10 дней.
2. Инициализирует переменную m значением 20.
3. Затем, программа проходит циклом от 1 до 10 (включительно) и сравнивает каждый элемент массива Dat[k] с текущим значением переменной m.
4. Если Dat[k] (температура текущего дня) меньше m, то переменная m принимает значение Dat[k].
5. В итоге, переменная m будет хранить минимальное значение из всех элементов массива Dat.

Давайте посчитаем, что будет напечатано в результате работы программы:

1. Dat[1] = 12, m = 20 (12 < 20) - m примет значение 12.
2. Dat[2] = 15, m = 12 (15 > 12) - m останется равным 12.
3. Dat[3] = 17, m = 12 (17 > 12) - m останется равным 12.
4. Dat[4] = 15, m = 12 (15 > 12) - m останется равным 12.
5. Dat[5] = 14, m = 12 (14 > 12) - m останется равным 12.
6. Dat[6] = 12, m = 12 (12 = 12) - m останется равным 12.
7. Dat[7] = 10, m = 10 (10 < 12) - m примет значение 10.
8. Dat[8] = 13, m = 10 (13 > 10) - m останется равным 10.
9. Dat[9] = 14, m = 10 (14 > 10) - m останется равным 10.
10. Dat[10] = 15, m = 10 (15 > 10) - m останется равным 10.

В результате, программа выведет число 10.