Дан массив. Требуется удалить из него элемент, стоящий на месте номер B, сдвинув все последующие элементы влево.
Входные данные
Записано сначала число N - количество элементов массива
(2≤N≤100), затем N чисел из диапазона Integer - элементы массива,
а затем число B (1≤B≤N).
Выходные данные
Выведите N-1 число - элементы массива с удаленным B-м элементом.
Примечание
Вы должны удалить элемент непосредственно из массива, а не сделать
вид при выводе данных, что у вас такого элемента нет. Также вы не
должны для этого заводить в программе дополнительный массив.
То есть ввод данных осуществляется следующим фрагментом:
read(n); for i:=1 to n do read(a[i]); read(b);
А вывод - следующим:
for i:=1 to n-1 do write(a[i],' ');
Необходимые фрагменты вы можете найти в файле P128.PAS на диске J:\
| Пример ввода | Пример вывода |
5 1 3 5 6 7 2 |
1 5 6 7 |