0 / 0 / 0
Регистрация: 31.10.2014
Сообщений: 7
1

Все положительные элементы массива, имеющие четный порядковый номер, переписать в начало массива

01.11.2014, 00:00. Показов 2310. Ответов 1
Метки нет (Все метки)

В одномерном массивеA=(a1, а2, ..., а n) все положительные элементы,
имеющие четный порядковый номер, переписать в начало массива.
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
01.11.2014, 00:00
Ответы с готовыми решениями:

В одномерном массиве отрицательные элементы, имеющие четный порядковый номер, переписать в начало массива
Пожалуйста помогите! В Турбо Паскале вроде всё понятно, а решить лабораторную не могу... Задача...

Удалить все положительные элементы, имеющие четный порядковый номер, идущие после минимального элемента массива.
Задание. Выполнить действия над одномерным массивом. Удалить все положительные элементы, имеющие...

В одномерном массиве А=(а1,а2...аn) все положительные элементы, имеющие чётный порядковый номер
Помогите плиз написать программу: В одномерном массиве А=(а1,а2...аn) все положительные элементы,...

Массив: В одномерном массиве, все отрицательные элементы, имеющие четный порядковый номер переписать в начало массива.
Подскажите, есть задача: В одномерном массиве, все отрицательные элементы, имеющие четный...

1
охотник
1011 / 535 / 650
Регистрация: 29.09.2014
Сообщений: 1,083
01.11.2014, 00:38 2
Лучший ответ Сообщение было отмечено ZX Spectrum-128 как решение

Решение

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
const n=10;
var a:array[1..n]of integer;
    i,j,k,q:integer;
begin
    for i:=1 to n do
     begin
      a[i]:=-5+random(11);
      write(a[i],' ')
     end;
     writeln;
     j:=1;i:=2;
     while i<=n do
      begin
       if (a[i]>0)
        then 
         begin
          inc(j);
          q:=a[i];
          for k:=i downto j do a[k]:=a[k-1];
          a[j-1]:=q;
         end;
        inc(i,2)
       end;
      for i:=1 to n do write(a[i],' ')
end.
2
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
01.11.2014, 00:38
Помогаю со студенческими работами здесь

Отрицательные элементы, имеющие четный порядковый номер, переписать в начало массива
Задание: В одномерном массиве A=(a1, а2, ..., аn) отрицательные элементы, имеющие четный порядковый...

Массив. Удалить все положительные элементы, имеющие четный порядковый номер, идущие после минимального элемента массива
11. В массиве A=(a1, а2, ..., аn) удалить все положительные элементы, имеющие четный порядковый...

В массиве A=(a1, а2, ., an) удалить все положительные элементы, имеющие четный порядковый номер, идущие после минимального элемента массива
В массиве A=(a1, а2, ..., an) удалить все положительные элементы, имеющие четный порядковый номер,...

Все положительные элементы, имеющие нечетный порядковый номер, переписать в конец массива
Задан массив из k чисел. Все положительные элементы, имеющие нечетный порядковый номер,...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru