Массив R[1]=-12, R[2]=-3, R[3]=-5, R[4] = - 6, R[5]=4, R[6]=9, R[7]=0, R[8]=8. Определите значение переменной kol после выполнения следующего фрагмента программы: kol:=0; for i:=1 to 8 do if r[i]>-2 then kol:=kol+1; writeln (kol)

Рассматриваются значения массива с индексами от 1 до 8.

Если его значение больше минус двух (-2), то прибавляем единицу (1) к переменной k, изначально равной нулю (0).

Просмотрим все значения (от 1 до 8):

R[1] = - 12 > - 2? Условие не выполняется, k остаётся прежним.

R[2] = - 3 > - 2? Условие не выполняется, k остаётся прежним.

R[3] = - 5 > - 2? Условие не выполняется, k остаётся прежним.

R[4] = - 6 > - 2? Условие не выполняется, k остаётся прежним.

R[5] = 4 > - 2? Условие выполняется, k = k + 1 = 0 + 1 = 1

R[6] = 9 > - 2? Условие выполняется, k = k + 1 = 1 + 1 = 2

R[7] = 0 > - 2? Условие выполняется, k = k + 1 = 2 + 1 = 3

R[8] = 8 > - 2? Условие выполняется, k = k + 1 = 3 + 1 = 4

Ответ: 4.