Определите и выведите на экран, в скольких играх разность забитых и пропущенных мячей больше трёх. Результат игр по футболу хранятся в массиве. Каждые три последовательных элемента массива содержат соответственно номер игры, количество забитых мячей и количество пропущенных мячей.- Basic(Бейсик)

INPUT "vvedite kolichestvo igr ", n
DIM a(n * 3)
FOR i = 1 TO n
a(i * 3 - 2) = i
PRINT "v "; i; " igre"
INPUT "zabito ", a(i * 3 - 1)
INPUT "propusheno ", a(i * 3)
NEXT
PRINT
PRINT "massiv"
FOR i = 1 TO n * 3
PRINT a(i);
NEXT
FOR i = 1 TO n
IF ABS(a(i * 3 - 1) - a(i * 3)) > 3 THEN k = k + 1
NEXT
PRINT "takih igr="; k