Дана программа. Определить результат выполнения. program N02 const A: array [1..10] of integer = (1, 36, 2, 18, 3, 12, 4, 9, 6, 6); var i, k: integer; begin k:=0; for i:=1 to 7 do if A[i]

Массив находит количество элементов массива, которые меньше последующего.

Но смотрим внимательно, цикл идёт лишь до 7.

1 < 36, k = 1

36 > 2, k = 1

2 < 18, k = 2

18 > 3, k = 2

3 < 12, k = 3

12 > 4, k = 3

4 < 9, k = 4

ответ: k = 4