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

Все элементы массива, равные нулю, поставить сразу после максимального элемента

11.02.2012, 23:50. Показов 1961. Ответов 1
Метки нет (Все метки)

хелп. нужно чтобы я вводила числа и строился массив из них и обрабатывался по варианту.

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

вариант:

В массиве А=(а12, ..., аn) все элементы равные нулю, поставить сразу после максимального элемента данного массива. Элементы массива вводить с клавиатуры.

и можно комментарии к коду
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
11.02.2012, 23:50
Ответы с готовыми решениями:

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

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

Все элементы заданного массива, равные нулю, поставить сразу после максимального элемента
В массиве A=(a1, а2, ..., аn) все элементы, равные нулю, поставить сразу после максимального...

Все элементы массива, равные нулю, поставить сразу после максимального элемента данного массива
В массиве A=(a1, а2, ..., аn) все элементы, равные нулю, поставить сразу после максимального...

1
Почетный модератор
64254 / 47554 / 32739
Регистрация: 18.05.2008
Сообщений: 115,182
12.02.2012, 14:54 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

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
44
45
46
47
48
uses crt;
const nmax=50;
var a:array[1..nmax] of integer;
    n,i,imx,j,k:integer;
begin
clrscr;
repeat
write('Введите размер массива до ',nmax,' n=');
readln(n);
until n in [1..nmax];
writeln('Введите элементы массива, целые числаЮ в том числе 0:');
for i:=1 to n do
 begin
  write('a[',i,']=');
  readln(a[i]);
 end;
clrscr;
writeln('Исходный массив:');
imx:=1;
for i:=1 to n do
 begin
  write(a[i],' ');
  if a[i]>a[imx] then imx:=i;
 end;
writeln;
writeln('Максимальный элемент=',a[imx],' его индекс=',imx);
writeln;
for i:=1 to n do
if(i<>imx)and(a[i]=0) then{если ноль и не максимальный}
 begin
  if i<imx then{раньше максимального}
   begin
    for j:=i to imx-1 do{сдвигаем на него все элементы до макс}
    a[j]:=a[j+1];
    a[imx]:=0;{на место максимального пишем 0}
   end
  else{если после максимального}
   begin
    for j:=i downto imx+2 do{сдвигаем на него все после максимального}
    a[j]:=a[j-1];
    a[imx+1]:=0;{на место максимального пишем 0}
   end;
 end;
writeln('Перестановка нолей:');
for i:=1 to n do
write(a[i],' ');
readln
end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
12.02.2012, 14:54
Помогаю со студенческими работами здесь

Элементы равные нулю поставить сразу после максимального элемента данного массива
В массиве A=( a1, а2, ..., аn) все элементы, равные нулю, поставить сразу после максимального...

Из одномерного массива А(20) удалить все элементы, равные 1/2 максимального элемента
Ребят, помогите написать программу пожалуйста: Из одномерного массива А(20) удалить все элементы,...

одномерный массив. Все его элементы, не равные нулю, переписать, сохраняя их порядок в начало массива, а нулевые элементы в конец массива in c++
одномерный массив. Все его элементы, не равные нулю, переписать, сохраняя их порядок в начало...

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


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

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

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