Question

Дан целочисленный массив A[n]. Создайте новый массив, выбросив из A[n] каждый пятый элемент.

Answer 1

Ответ:

PascalABC.NET

var a,b: array of integer;

var n: integer;

begin

write('Введите n: ');

readln(n);

a := ArrRandom(n);

write('Исходный массив: ');

a.PrintLn();

write('Новый массив: ');

b := a.FindAll(t -> a.IndexOf(t) mod 5 <> 0);

b.Print();

end.

Answer 2

Чтобы создать новый массив, исключив каждый пятый элемент из исходного массива A[n], можно пройти по всем элементам и добавить в новый массив только те элементы, индексы которых не делятся на 5 нацело. Вот пример на псевдокоде:

plaintextCopy code
Создать новый пустой массив B
Для каждого элемента A[i] в исходном массиве A:
    Если i не делится нацело на 5:
        Добавить A[i] в массив B

Если вы хотите пример на конкретном языке программирования (например, Python), дайте знать, и я предоставлю соответствующий пример кода.