Question

Удалите из массива все элементы, содержащие в своей записи цифру 5.

Answer 1

//Pascal ABC.NET v3.0 сборка 1111

Const
 n=5;

Var
 ars:array[1..n] of string;
 i,j,k:integer;
begin
k:=n;
 for i:=1 to n do
 readln(ars[i]);
 for i:=1 to n do
  if pos('5',ars[i])<>0 then
   begin;
    for j:=i to n-1 do 
     ars[j]:=ars[j+1];
     dec(k);
   end;
 writeln('Final array:');
  for i:=1 to k do
  writeln(ars[i]);
end.

Пример ввода:
3434
5656
6767
5757
8989
Пример вывода:
Final array:
3434
6767
8989

Answer 2

  const n =30;
 var
 s:string; 
i,k,m:integer; 
a:array[1..n] of integer; 
b:array[1..n] of integer; 
begin 
for i:=1 to n do
 readln(a[i]);
 k:=1    ;
for i:=1 to n do 
begin 
str(a[i],s);
 if pos('5',s) = 0 then 
begin 
b[k]:= a[i]; 
k:=k+1; 
end; end;
for i:= 1 to n do
a[i]:=b[i]; 
for i:= 1 to n do 
write(a[i],' '); 
end.

Answer 3

Для удаления элементов из массива, содержащих цифру 5, вы можете использовать различные методы в зависимости от того, на каком языке программирования вы работаете. Ниже приведен пример на Python:

# Исходный массив
my_array = [123, 45, 678, 90, 555]

# Удаляем элементы, содержащие цифру 5
filtered_array = [x for x in my_array if '5' not in str(x)]

print(filtered_array)

В этом примере мы используем генератор списка (list comprehension), чтобы создать новый массив `filtered_array`, в который включаются только те элементы из исходного массива `my_array`, в записи которых нет цифры 5. Функция `str(x)` преобразует каждый элемент массива в строку, и мы проверяем, содержится ли цифра 5 в этой строке.

Если вы используете другой язык программирования, дайте мне знать, и я могу предоставить пример кода для этого языка.