Как получить элементы из массива? и поменять их местами!
СзМассив(А,Б,В,Г,Д,)

мне нужно получить из СзМассив элементы Г,Д и поменять их местами!
например:

СзМассив(А,Г,В,Д,Б,)

(436) конец ровно в строчке КонецЦикла. сходи в меню отладка, открой для себя пошаговое исполнение

вспоминается ещё, как Ли Вонг(?) возрадовался до плеши

+(438) «С другом по магазинам» @ http://lurkmore.to/Ли_Вонг_Ян

а как открыть я только не понял нажимаем стоп откладку красную точку ставим и ф11?

(434) Все начинают с пузырька потому что это примитив. Не надо ничего придумывать - все логично.
(440) Шагай к своему учителю, пусть он тебя учит

экая она разозлилась. хорошо, что меня со вчерашней "лошадью" пронесло ;)

забыл спросить ладно в гуглал найду не хочу потревожить его по пустякам у него тоже есть своя жизнь я благодарен ему что помогает и признателен поэтому я так усердно пытаюсь понять что к чему и он насовсем учитель но преподает мне уроки и я этому рад

(441) не знаю, мне рекурсивная сортировка больше нра

wild и любопытная из вас тоже вышли отличные учителя если я вас понял 80% то уверен другие поймут на все 100% ^_^

(431)в винде аккардеон к мыши приделывается на раз два

(444) когда я первый раз смотрел на визуализацию бого, думал "ах ни хрена ж себе, что творят! щас бац - и одним лёгким движением в конце всё упорядочат"

пора модераторам закрыть эту ветку странно что не банили ветку не удалили . смирились наверняка что я освоил аномаизер)))

(446) это после визуализации сортировок ;)

а сколько лет форума миста смотрю некоторые давно зарегистрированные

(444) Леш, ты явно гораздо умнее меня) Я, при первой встрече с массивами в 9м классе на занятиях в кружке, придумала только пузырек)

wild  17 октября 2006; Стаж: 7 лет 1 месяц 20 дней

7 лет многовато ты наверняка привык к форум миста


боюсь представить если тебя забанет)))

(452) а чо такого? бывало. за "с вас 500 рублей", за "блин", за сузуки для катены даже страдал ;)

вы мне лучше скажите, откуда у меня в перед открытием кнопка на форме с режимом меню оказывается заполненной? 8.1

ты это кому отвечал )) и что за непонятные цифры в переди (452) давно хотел спросить это типа к кому отвечаешь

+(454) первая строка перед открытием, есессно

(455) истинно так. кнопки под ником даже нажимаются

(456) Нету у меня ни одной базы 8.1, чтобы разгадать твою чудесную загадку

(458) ну ты же правильно сказала, что нарисовано прямо в форме. нужно развивать свою технику мышиного тычка

(459) т.е. ты просто не до ткнул? (недоткунл/ не доткнул?)

(460) не с глаголами

(461) не я в курсе, а до?

не доткнул. проверочное слово не докрасил

а недоткнул - это зверь какой-то семейства сумчатых

(464) мне его жалко. С таким-то именем...

(463) о_О

(464) Недотыкомка? Это, вроде как , нечто иное.

(467) недотыкомка - это из ряда (439): "В магазине мы имели один бутылка, много молоки, хлебу, *опку, поридж, кока, еда квашеный, гризли сущеный, карасик и другие овощи."

Надо ж, ветка еще жива. Это вместо пятничной что ли?

Дотянул таки до заветной

(469) не сместо, а паралельно

*не вместо

да занавес уже. автор избрал сортировку глупца. сложность ровно на порядок больше пузырьковой: n^3 против n^2
wiki:Глупая_сортировка

(469)Соревнуемся. Екатерина пятничную ветку делала часов до 4 вечера.

(473) + http://habrahabr.ru/post/204968/

(475) как грится, 10х
далеко не разбегайтесь, планирую хоть что-нибудь на выходных заделать ;)

ребята у меня вопрос а как запустить индекс например с 5 до 1 типа наоборот?
массив.количество=индекс+5 потом снижаемся на один меньше до 1

типа -1?

или как?

или индекс = 5 -1

(477) ага, прям так и пиши)

я сериёзно

(477)

Для ы=-5 по -1 Цикл
    Инд = -ы;
    ...
КонецЦикла;


индекс = 5;
индекс = М.Количество -1

так?

спосибо

закончились вопросы? очень странно )

походу неправильно)))налукавел))

(485) расскажи, как ты понял, что неправильно)

Для индекс =-5 по -1 Цикл
    Инд = -ы;
    ...
Конец Цикла;

не может быть -5

если индекс = 0 тогда он начинает с цифрой 1 если укажем +1
если индекс = 5 тогда он начинает с цифрой 5 и мы укажем -1
будет уже 4321

Для индекс = 5 по -1 Цикл думаю будет как-то так!

(487) Для индекс =-4 по 0 Цикл

(487) ты там чего такое задумал?

дойти до индекс 9 один круг потом обратно с 9 но тоже сортировать в одном слове ^_^ Шейкерная сортировка

(490) не до 9, а до Н

до н и указать н-1

wild ну скажи плиз как запустить откладку с красной точкой

все нашел))

(490) Шелла штоль?
(494) шифт+ф9 покажет тебе значения переменных. ну или в табло

нашел как пройтись с красной точкой

везёт тебе. многие тут так и не освоили

щяс код поставлю с Шейкерная сортировка скажешь если правильный
молодец^_^ если я на правильном пути скажешь КонецБлизок иначе ))) скажешь конецНеБлизок

ок ты таким образом мне поможешь)

не ожидал что тема так вырастет.
жгите дальше.

пицот,чего уж там.

писот!

(500) фу, грязный читер

мимо ;)

не надо оскорблений, так получилось

интересно, чем сейчас занимается наш пациент...

любители тянуть резину за хвост..

(495) Не, не Шелла. Двунаправленная пузырьковая сортировка по другому называется.

http://habrahabr.ru/post/204600/ 3 сортировка из списка

&НаКлиенте
Функция МассивЧисел()
    
    МассивЧисел = Новый Массив();
    МассивЧисел.Добавить(3); // и = 0
    МассивЧисел.Добавить(1); // и = 1
    МассивЧисел.Добавить(5); // и = 2    
    МассивЧисел.Добавить(0); // и = 3    
    МассивЧисел.Добавить(7); // и = 3    
    МассивЧисел.Добавить(12); // и = 3    
    МассивЧисел.Добавить(22); // и = 3    
    МассивЧисел.Добавить(9); // и = 3    
    
    Индекс = 0;
    
    МассивЧиселКоличество = МассивЧисел.Количество() - 2;   // - 2 потомучто доходим до предпоследнего элемента, НЕ ПОСЛЕДНЕГО!!!    
    Пока Индекс <= МассивЧиселКоличество Цикл
        // идем по массиву, сравниваем значение элемента массива со следующим значением элемента
        Если МассивЧисел[Индекс] >  МассивЧисел[Индекс+1] Тогда
            // поменять местами значения
            ВременнаяПеременная = МассивЧисел[Индекс+1];
            МассивЧисел[Индекс+1] = МассивЧисел[Индекс];    // здесь мы получаем такой массив: 3 3 4 0
            МассивЧисел[Индекс] = ВременнаяПеременная;    // а здесь мы получаем: 2 3 4 0
             //Индекс = 0; // начнем обход с начала
        //Иначе
        Индекс = Индекс + 1;
    КонецЕсли;
    //КонецЦикла;
    Если
        МассивЧисел[Индекс-1] > МассивЧисел[Индекс] Тогда
            ВременнаяПеременная = МассивЧисел[Индекс-1];
            МассивЧисел[Индекс-1] = МассивЧисел[Индекс];
            МассивЧисел[Индекс] = ВременнаяПеременная;                
            КонецЕсли;
            Индекс = Индекс - 1;//Двигаем позицию на шаг назад              
        КонецЦикла;        
    КонецЦикла;      
    
    // выести на экран результат
    Для Индекс = 0 по МассивЧиселКоличество + 1 цикл
        Сообщить(МассивЧисел[Индекс]);
    КонецЦикла;
    
    
КонецФункции




я на правильном пути?

там же два цикла. справа налево и слева направо

там слишком много канецЦицла необрасяите внимание
а так я на правильном пути или совсем плохо

я потом исправлю

МассивЧисел[Индекс-1] > МассивЧисел[Индекс] Тогда
            ВременнаяПеременная = МассивЧисел[Индекс-1];
            МассивЧисел[Индекс-1] = МассивЧисел[Индекс];
            МассивЧисел[Индекс] = ВременнаяПеременная;                
            КонецЕсли;
            Индекс = Индекс - 1;//Двигаем позицию на шаг назад              
        КонецЦикла;        
    КонецЦикла;      


это правильно






Шейкерная сортировка

смотри доделал но у меня бесконечный цикл :(



&НаКлиенте
Функция МассивЧисел()
    
    МассивЧисел = Новый Массив();
    МассивЧисел.Добавить(3); // и = 0
    МассивЧисел.Добавить(1); // и = 1
    МассивЧисел.Добавить(5); // и = 2    
    МассивЧисел.Добавить(0); // и = 3    
    МассивЧисел.Добавить(7); // и = 3    
    МассивЧисел.Добавить(12); // и = 3    
    МассивЧисел.Добавить(22); // и = 3    
    МассивЧисел.Добавить(9); // и = 3    
    
    Индекс = 0;
    
    МассивЧиселКоличество = МассивЧисел.Количество() - 2;   // - 2 потомучто доходим до предпоследнего элемента, НЕ ПОСЛЕДНЕГО!!!    
    Пока Индекс <= МассивЧиселКоличество Цикл
        // идем по массиву, сравниваем значение элемента массива со следующим значением элемента
        Если МассивЧисел[Индекс] >  МассивЧисел[Индекс+1] Тогда
            // поменять местами значения
            ВременнаяПеременная = МассивЧисел[Индекс+1];
            МассивЧисел[Индекс+1] = МассивЧисел[Индекс];    // здесь мы получаем такой массив: 3 3 4 0
            МассивЧисел[Индекс] = ВременнаяПеременная;    // а здесь мы получаем: 2 3 4 0
            Индекс = Индекс + 1;
    КонецЕсли;
    Если
        МассивЧисел[Индекс-1] <= МассивЧисел[Индекс] Тогда
        ВременнаяПеременная = МассивЧисел[Индекс-1];
        МассивЧисел[Индекс-1] = МассивЧисел[Индекс];
        МассивЧисел[Индекс] = ВременнаяПеременная;                
    КонецЕсли;
        Индекс = Индекс - 1;//Двигаем позицию на шаг назад              
        КонецЦикла;
    
    // выести на экран результат
    Для Индекс = 0 по МассивЧиселКоличество + 1 цикл
        Сообщить(МассивЧисел[Индекс]);
    КонецЦикла;
    
    
КонецФункции

перед самым концом цикла ты сдвигаешь индекс на шаг назад

wiiild????? скажи правильно?

поставил +1 Индекс = Индекс - 1;//Двигаем позицию на шаг назад      


сортировка неправильное(((

н=м.количество();
й=н-1;
пока й>0 цикл
если м[й]>м[й-1] менять_местами
й=й-1
н=н-1
конец цикла;

вот так ты пройдёшь один раз. потом так же в обратную сторону:
к=0;
для й=к по н-1
...
к=к+1;

и это дело повторяется, пока к и н не сойдутся в одной точке

придется опять блок схему сделать но у меня нету времени

а тут даже сишный код есть
https://ru.wikipedia.org/wiki/Шейкерная_сортировка

посиб

(519) сейчас у него будет взрыв мозга от сишного синтаксиса...
Всем в укрытие!

к это что

(522) граница слева. н - справа

блин так сложно :(

кстати, помимо ++ у сей есть do while. у 1с же нету такого, только через пока конеццикла?

(524) можно загнать твой массив в ТЗ, а ТЗ скормить СКД. СКД сама отсортирует

вот получать пачку данных в несколько десятков тысяч записей из соседней базы, прикручивать к ним данные из своей, выводить с нужными группировками, ресурсами и вычисляемыми полями, красить различия в данных из "там" и "из тут", да ещё чтоб за минуту хотя бы сделалось - вот это не так просто. задумайся ;)

(527) в минуту я не уложился вроде. одно подключение к соседней базе занимает секунд 6-8. продажи за месяц у меня секунд 70-80 получаются. плюс вывод

&НаКлиенте
Функция МассивЧисел()
    
    МассивЧисел = Новый Массив();
    МассивЧисел.Добавить(3); // и = 0
    МассивЧисел.Добавить(1); // и = 1
    МассивЧисел.Добавить(5); // и = 2    
    МассивЧисел.Добавить(0); // и = 3    
    МассивЧисел.Добавить(7); // и = 3    
    МассивЧисел.Добавить(12); // и = 3    
    МассивЧисел.Добавить(22); // и = 3    
    МассивЧисел.Добавить(9); // и = 3    
    
    Индекс = 0;
    
    МассивЧиселКоличество = МассивЧисел.Количество() - 2;   // - 2 потомучто доходим до предпоследнего элемента, НЕ ПОСЛЕДНЕГО!!!    
    Пока Индекс <= МассивЧиселКоличество Цикл
        // идем по массиву, сравниваем значение элемента массива со следующим значением элемента
        Если МассивЧисел[Индекс] >  МассивЧисел[Индекс+1] Тогда
            // поменять местами значения
            ВременнаяПеременная = МассивЧисел[Индекс+1];
            МассивЧисел[Индекс+1] = МассивЧисел[Индекс];    // здесь мы получаем такой массив: 3 3 4 0
            МассивЧисел[Индекс] = ВременнаяПеременная;    // а здесь мы получаем: 2 3 4 0
            
            Индекс = 0; //здесь надо начнем обход с начала? здесь надо код в обратную сторуну?
        Иначе
            Индекс = Индекс + 1;
        КонецЕсли;
        
    КонецЦикла;
    
    // выести на экран результат
    Для Индекс = 0 по МассивЧиселКоличество + 1 цикл
        Сообщить(МассивЧисел[Индекс]);
    КонецЦикла;

блин как представлять это(((

печально но моя не понимает я дохожу до конца круга и не знаю что дальше сделать!

оператор если надо

кажется понял начну я сначала!

блин зачем стерли часть ветки ((((

wild посмотри вроде бы все норм а не работает


Функция МассивЧисел()
    
    МассивЧисел = Новый Массив();
    МассивЧисел.Добавить(3); // и = 0
    МассивЧисел.Добавить(1); // и = 1
    МассивЧисел.Добавить(5); // и = 2    
    МассивЧисел.Добавить(0); // и = 3    
    МассивЧисел.Добавить(7); // и = 3    
    МассивЧисел.Добавить(12); // и = 3    
    МассивЧисел.Добавить(22); // и = 3    
    МассивЧисел.Добавить(9); // и = 3    
    
    Индекс = 0;
    
    МассивЧиселКоличество = МассивЧисел.Количество() - 2;   // - 2 потомучто доходим до предпоследнего элемента, НЕ ПОСЛЕДНЕГО!!!    
    Пока Индекс <= МассивЧиселКоличество Цикл
        // идем по массиву, сравниваем значение элемента массива со следующим значением элемента
        Если МассивЧисел[Индекс] >  МассивЧисел[Индекс+1] Тогда
            // поменять местами значения
            ВременнаяПеременная = МассивЧисел[Индекс+1];
            МассивЧисел[Индекс+1] = МассивЧисел[Индекс];    // здесь мы получаем такой массив: 3 3 4 0
            МассивЧисел[Индекс] = ВременнаяПеременная;    // а здесь мы получаем: 2 3 4 0
        КонецЕсли;
          КонецЦикла;
            Индекс = Индекс + 1;
        Если МассивЧисел[Индекс-1] >  МассивЧисел[Индекс] Тогда
            // поменять местами значения
            ВременнаяПеременная = МассивЧисел[Индекс-1];
            МассивЧисел[Индекс-1] = МассивЧисел[Индекс];
            МассивЧисел[Индекс] = ВременнаяПеременная;
        КонецЕсли;
            Индекс = Индекс - 1;    
    // выести на экран результат
    Для Индекс = 0 по МассивЧиселКоличество + 1 цикл
        Сообщить(МассивЧисел[Индекс]);
    КонецЦикла;
КонецФункции

вот тебе задача попроще. возьми свой работающий (работающий же?) пузырёк и измени алгоритм так, чтобы оно сортировалось в обратном порядке, от большего к меньшему

закладка
http://habrahabr.ru/post/205290/