Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.89/9: Рейтинг темы: голосов - 9, средняя оценка - 4.89
2 / 2 / 2
Регистрация: 24.09.2012
Сообщений: 45
1

Удалить из массива все четные элементы, стоящие на нечетных местах и сжать массив

24.09.2012, 21:39. Показов 1698. Ответов 4
Метки нет (Все метки)

Ребят, нужно решить задачу с помощью функций:

1. Удалить из массива все четные элементы, стоящие на нечетных местах и сжать массив.

Заранее спасибо !!!
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
24.09.2012, 21:39
Ответы с готовыми решениями:

Удалить из массива все четные элементы стоящие на нечетных местах.
Дан массив целых чисел. Удалить из него все четные элементы стоящие на нечетных местах. ...

Массив: Удалить из массива четные элементы,стоящие на нечетных местах.
1)четные,стоящие на нечетных местах. 2) начиная с к1 по к2(к1 и к2 вводяться с клавиатуры)

Элементы массива Х[i] стоящие на четных местах переписать в массив Y[i] а стоящие на нечетных местах в Z[i]
Элементы массива Х стоящие на четных местах переписать в массив Y а стоящие на нечетных местах в Z

Удалить положительные элементы массива, стоящие на нечетных местах
Помогите сделать программу в паскале! удалить положительные элементы массива, стоящие на нечетных...

__________________
4
Фрилансер
3411 / 2808 / 3000
Регистрация: 08.02.2012
Сообщений: 8,023
Записей в блоге: 1
25.09.2012, 15:09 2
На будущее пользуйтесь поиском по форуму!
Удалить все четные элементы, стоящие на нечетных местах
1
2 / 2 / 2
Регистрация: 24.09.2012
Сообщений: 45
25.09.2012, 16:56  [ТС] 3
В том то и дело, мне требуется решить задачу с использованием Функций, + ещё сжать полученный массив, т.е. решение будет сильно отличаться от Удалить все четные элементы, стоящие на нечетных местах ))
Ребят, помогите пожалуйста ))
Спасибо заранее)
0
Фрилансер
3411 / 2808 / 3000
Регистрация: 08.02.2012
Сообщений: 8,023
Записей в блоге: 1
25.09.2012, 17:28 4
Цитата Сообщение от Oksana_Semkina Посмотреть сообщение
В том то и дело, мне требуется решить задачу с использованием Функций, + ещё сжать полученный массив
так там и так идёт сжатие массива т.е элементы переставляются в начало, а на счёт функции вы можете и сами определить эти действия в функцию)
0
Дзæуджыхъæу
232 / 204 / 148
Регистрация: 20.09.2012
Сообщений: 421
Записей в блоге: 1
25.09.2012, 17:44 5
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
Uses crt;
type  mas=array[1..100] of integer;
Var
 a:mas;
 n:integer;
procedure soz (var a: mas) ;
var I:integer;
begin
randomize;
repeat
 write('Размер массива n=');
 readln(n);
until n in [1..100];
writeln('Исходный массив:');
for i:=1 to n do
 begin
  a[i]:=random(10)-3;
  write(a[i],' ');
 end;
end;
procedure modi(var a:mas);
var i,j:integer;
begin
for i:=(n div 2+n mod 2) downto 1 do
    if a[i*2-1] mod 2=0 then
    begin
    for j:=i*2-1 to n-1 do
        a[j]:=a[j+1];
        n:=n-1;
    end;
writeln;
end;
procedure print(a:mas);
var i:integer;
begin
for i:=1 to n do
  write(a[i],' ');
end;
begin
soz(a);
modi(a);
print(a);
end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
25.09.2012, 17:44

Заказываю контрольные, курсовые, дипломные работы и диссертации здесь.

Все элементы массива, стоящие на нечетных местах разделить на случайное число
задача4-Сформировать одномерный целочисленный массив, содержащий случайные значения элементов в...

Удалить все четные элементы, стоящие на нечетных местах
Удалить все четные элементы, стоящие на нечетных местах Добавлено через 1 минуту одномерный...

Удалить все четные элементы, стоящие на нечетных местах
Удалить все четные элементы, стоящие на нечетных местах.

Удалить из него все четные элементы, стоящие на нечетных местах
Пожайлуста помогите решить задачу в паскале, дан одномерный массив целых чисел, удалить из него все...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.