Решить на basic. в ответах: 1, а у меня получается 2. dim mas(7) as integer mas(1) = 10: mas(2) = 5 mas(3) = 7: mas(4) = 3 mas(5) = 9: mas(6) = 2 mas(7) = 4 k = 0: m = 2 for i = 2 to 7 if mas(i) - mas(i - 1) > m then k = k + 1 end if next i print k

Проанализируем работу цикла:
i=2
Mas(i) - Mas(i-1) > m ⇒ Mas(2) - Mas(1) > m ⇒ 5-10 > 2 ⇒ -5 > 2 ⇒ нет
i=3
Mas(i) - Mas(i-1) > m ⇒ Mas(3) - Mas(2) > m ⇒ 7-5 > 2 ⇒ 2 > 2 ⇒ нет
i=4
Mas(i) - Mas(i-1) > m ⇒ Mas(4) - Mas(3) > m ⇒ 3-7 > 2 ⇒ -4 > 2 ⇒ нет
i=5
Mas(i) - Mas(i-1) > m ⇒ Mas(5) - Mas(4) > m ⇒ 9-3 > 2 ⇒ 6 > 2 ⇒ да; k=1
i=6
Mas(i) - Mas(i-1) > m ⇒ Mas(6) - Mas(5) > m ⇒ 2-9 > 2 ⇒ -7 > 2 ⇒ нет
i=7
Mas(i) - Mas(i-1) > m ⇒ Mas(7) - Mas(6) > m ⇒ 4-2 > 2 ⇒ 2 > 2 ⇒ нет

ответ: k=1