Краткое пояснение:
Программа подсчитывает количество элементов массива Work, значения которых меньше 7.
Пошаговое решение:
- Шаг 1: Инициализация переменных.
- k (счетчик цикла) — будет изменяться от 1 до 15.
- m (счетчик условий) — инициализируется значением 0.
- Шаг 2: Заполнение массива Work значениями (согласно приведенному коду).
- Work[1]=5, Work[2]=4, Work[3]=5, Work[4]=7, Work[5]=6, Work[6]=12, Work[7]=7, Work[8]=3, Work[9]=9, Work[10]=7, Work[11]=0, Work[12]=9, Work[13]=1, Work[14]=0, Work[15]=8
- Шаг 3: Цикл от k=1 до 15. Проверка условия
If Work[k] < 7 Then Begin m:= m + 1; End; - k=1: Work[1]=5 < 7. m = 1.
- k=2: Work[2]=4 < 7. m = 2.
- k=3: Work[3]=5 < 7. m = 3.
- k=4: Work[4]=7. Условие не выполняется.
- k=5: Work[5]=6 < 7. m = 4.
- k=6: Work[6]=12. Условие не выполняется.
- k=7: Work[7]=7. Условие не выполняется.
- k=8: Work[8]=3 < 7. m = 5.
- k=9: Work[9]=9. Условие не выполняется.
- k=10: Work[10]=7. Условие не выполняется.
- k=11: Work[11]=0 < 7. m = 6.
- k=12: Work[12]=9. Условие не выполняется.
- k=13: Work[13]=1 < 7. m = 7.
- k=14: Work[14]=0 < 7. m = 8.
- k=15: Work[15]=8. Условие не выполняется.
- Шаг 4: Вывод значения переменной m.
Ответ: 8