Дана программа: Program E2_1; Var a: Array [1.8] Of Integer; M, k: Integer; Begin For k := 1 To 8 Do...

При заданном массиве (3, 8, 7, 9, 4, 10, 2, 12) оператор M := a[k] будет выполнен 7 раз. Каждый элемент массива будет сравниваться с текущим значением M, и если текущий элемент больше, то M будет обновлено новым значением. Таким образом, оператор M := a[k] будет выполнен для всех элементов массива, за исключением первого элемента, который инициализирует значение M.

Ответ: D) 1.

Давайте разберем, как работает данная программа. Программа ищет максимальное значение в массиве чисел.

1. Инициализация массива и переменных:

   • У нас есть массив a из 8 элементов.
   • Переменная M будет использоваться для хранения текущего максимального значения.
   • Переменная k - для циклов.

2. Чтение значений в массив:

   • Используется цикл For k := 1 To 8 Do Readln (a[k]);, который читает 8 значений и сохраняет их в массив a.

3. Поиск максимального значения:

   • На начальном этапе M присваивается значение a[1], то есть M := 3.
   • Затем программа проходит по всем элементам массива a начиная со второго (a[2]) до последнего (a[8]).
   • На каждой итерации цикла проверяется условие If M < a[k] Then M := a[k];. Если текущее значение элемента массива a[k] больше, чем текущее максимальное значение M, то M обновляется.

Теперь, посмотрим на сам массив: (3, 8, 7, 9, 4, 10, 2, 12) и определим, сколько раз будет выполнено присваивание M := a[k]:

• Начинаем с M = 3.
• k = 2: 8 > 3, обновляем M = 8.
• k = 3: 7 < 8, не обновляем.
• k = 4: 9 > 8, обновляем M = 9.
• k = 5: 4 < 9, не обновляем.
• k = 6: 10 > 9, обновляем M = 10.
• k = 7: 2 < 10, не обновляем.
• k = 8: 12 > 10, обновляем M = 12.

Таким образом, оператор M := a[k] выполнится 4 раза. Правильный ответ: C) 4.