Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
sanya2287
2 / 2 / 1
Регистрация: 16.10.2012
Сообщений: 33
1

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

01.11.2012, 00:26. Просмотров 981. Ответов 1
Метки нет (Все метки)

1)четные,стоящие на нечетных местах.
2) начиная с к1 по к2(к1 и к2 вводяться с клавиатуры)
0
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
01.11.2012, 00:26
Ответы с готовыми решениями:

Удалить из массива все четные элементы, стоящие на нечетных местах и сжать массив
Ребят, нужно решить задачу с помощью функций: 1. Удалить из массива все...

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

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

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

Элементы массива стоящие на нечетных местах умножить на 5
Здравствуйте. Помогите пожалуйста с программой. Элементы массива стоящие на...

1
Leshak
259 / 235 / 160
Регистрация: 10.12.2011
Сообщений: 513
01.11.2012, 04:05 2
Лучший ответ Сообщение было отмечено sanya2287 как решение

Решение

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
const n = 15; 
var
    arr: array[1..n] of integer;
    i, j, m: integer;
begin
    randomize;
    for i := 1 to n do begin
        arr[i] := random(50);
        write(arr[i]:4);
    end;
 
    m := n;
    i := 1;
    while i <= m do
        if  ( i mod 2 <> 0 )  and ( arr[i] mod 2 = 0 ) then begin
            for j := i to m - 1 do
                arr[j] := arr[j+1];
            m := m - 1
        end
        else
            i := i + 1;
 
    for i:= 1 to m do
        write(arr[i]:4);
 
readln
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
01.11.2012, 04:05

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

Вывести на экран сначала элементы массива, стоящие на четных местах, затем на нечетных
ВЫвести элементы массива в обратном порядке Добавлено через 2 минуты Дан...

Дан массив. Вывести на экран сначала с элементы, стоящие на чет¬ных местах, затем — на нечетных
Дан массив. Вывести на экран сначала с элементы, стоящие на чет¬ных местах,...


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

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

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