Дана программа. Определить результат выполнения.
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

Объяснение:k = 4 k = 4 k = 4 k = 4 k = 4 k = 4 k = 4 k = 4 k = 4 k = 4 k = 4 k = 4 k = 4 k = 4 k = 4 k = 4k = 4k = 4 k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4k = 4.