В массиве из 12 целых положительных чисел от 0 до 20 поменять местами первый и последний элементы, второй и предпоследний, и т.д.. Вывести исходный и полученный массивы, ABC Paskal

Возможны опечатки, т.к. плохо знаком с синтаксисом паскаля, но думаю все поймете. a,i,m(12) as integer for i=1 to 12 do readln(m(i)); for i=1 to 6 do begin a:=m(i); m(i):=m(13-i); m(12-i):=a; end; for i=1 to 12 do writeln(m(i)); end. Если что-то не понятно или выводит ошибку - пишите.