Изменения

for i = 1..n for Rj -> alpha if( A -> w[i] in Г) a[A, i, i+1] = true else a[A, i, i+1] = false if( A -> eps in Г) a[A, i, i] = true else a[A, i, i] = false h[A->alpha, i, i, 0] = true