Дан одномерный массив числовых значений, насчитывающий N элементов. Исключить из него M элементов,начиная с номера K- QBasic(Бейсик)

cls
input "razmernost"; n
dim a(n)
randomize timer
for i = 1 to n
a(i)=rnd(1)*50
next i
input "nachalo"; k
input "kolichestvo"; m
for i = k to k+m
a(i)=a(i+m)
next i