удаление чётного элемента из массива Опции

[Новичок]

Здравствуйте, помогите разобраться в одном моменте.
В массиве удалить чётный элемент. Программа работает когда ввожу все чётные элементы, как только заполняю массив всеми нечётными - выходит сообщение об ошибке.
Вот ниже приведено основное решение в программе

for i:=1 to n do
if a[i]mod 2=0 then m:=i;
for i:=m to n-1 do
a[i]:=a[i+1];
for i:=1 to n-1 do
writeln ('новый массив',a[i]);
end.

заранее спасибо

[Lapp]

М

Новичок, будь так добр, посмотри, пожалуйста, сюда, сюда и сюда.. И скажи: ты долго будешь еще не обращать внимания на замечания модераторов пренебрегать правилами? Прочти Правила Форума (ссылка вверху) и обрати внимание на п.5, а также правила раздела задачи, п.2

[Гость]

Скажите как использовать теги

 ... 

.
Не могу понять как использовать операторные скобки begin-end? когда их ставить, когда нет. Прошу не ругайте сильно я только ещё учусь программировать

[Ozzя]

как использовать операторные скобки begin-end

Если количество операторов более одного.

Скажите как использовать теги

Выделить текст, выбрать code -> pascal/delphi