Ответ:

• begin
• var a := ReadArrInteger(10).ToList;
• Println('До   :', a);
• a.RemoveAt(2);
• Println('После:', a);
• end.

Объяснение:

• var a := ReadArrInteger(10).ToList;

Объявляем переменную a - переведённый в List (список) одномерный массив из 10 элементов, заполненный числами, введёнными с клавиатуры.

Напомню: список List – это динамический массив с возможностью динамического изменения размеров по ходу работы программы.

• Println('До :', a);

Выводим надпись "До   :" и массив на экран.

• a.RemoveAt(2);

Удаляем элемент под индексом/номером "2" (отсчёт идёт от нуля).

• Println('После:', a);

Выводим надпись "После:" и массив на экран.

Пример работы: