Дан целочисленный массив с количеством элементов n. "Сожмите" массив, выбросив из

Дан целочисленный массив с количеством частей n. "Сожмите" массив, выбросив из него каждый 2-ой элемент.
Примечание. Дополнительный массив не использовать.

Задать свой вопрос
1 ответ
Какой язык? Откуда вводятся элементы?
Arfereva Darja
Паскаль. Линейные массивы
Oleg
Я имел в виду, числа вводятся с клавиатуры либо компьютер сам рандомно забивает массив?
Ярослава Мускина
Если с клавиатуры, то так:
Мария Баловленкова
var a: array of integer; i,j,z: integer;beginreadln(z);SetLength(a,z+2); for i:=1 to z do readln(a[i]); for i:=z downto 1 do if i mod 2=0 then for j:=i to z-1 do a[j]:=a[j+1]; for i:=1 to z-(z div 2) do write(a[i]:4);end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт