Сортировка слиянием

FastCode 63 8

Дано два отсортированных по возрастанию массива А и В. Необходимо вывести по возрастанию все элементы этих массивов.

Автор: ildarovich

ёж = 0; 
Для уж = 0 По А.Количество() + В.Количество() - 1 Цикл 
    що = (уж - ёж) = В.Количество() ИЛИ ёж < А.Количество() И А[ёж] < В[уж - ёж]; 
    Сообщить(?(що, "а" + ёж + "=" + А[ёж], "в" + (уж - ёж) + "=" + В[уж - ёж])); 
    ёж = ёж + що 
КонецЦикла
ё = 0; 
Для Сч = 1 По А.Количество() + В.Количество() Цикл 
    ж = (Сч - 1 - ё) = В.Количество() ИЛИ ё < А.Количество() И А[ё] < В[Сч - 1 - ё]; 
    Сообщить(?(ж, "А[" + ё + "]=" + А[ё], "В[" + (Сч - 1 - ё) + "]=" + В[Сч - 1 - ё])); 
    ё = ё + ж 
КонецЦикла
OneTracker - трекер учета рабочего времени программиста 1С

Комментарии

Bezeus
#1, 06 мая 2020 21:22

Отвратительный код. У вас буквы ограничены? Переменная "ё"? Это типа юмор?


Bezeus
#2, 06 мая 2020 21:29

Пробежался по публикациям. Понял - это не юмор, а профдеформация.Ок


FastCode
#3, 07 мая 2020 09:33

(1) Bezeus, я не автор публикации. Если хотите написать автору, то в публикации есть ссылка на источник.
Также Вы можете сформировать свою библиотеку публикаций и ограничить поиск только по избранному, если какие-то публикации Вам не подходят по оформлению или по содержанию 😃


Bezeus
#4, 07 мая 2020 20:42

(3) FastCode, спасибо за совет. Но тут не хватает чёрных списков по авторам. Приведённых код на инфостарте писан примерно в 2014-ом году. И за 6 лет манера написания у этого человека не изменилась. Я не хочу видеть только свои публикации или только избранное. Тут скорее желание сберечь глаза и мозг от авторов разнообразного говнокода.


Farovsky
#5, 15 июня 2020 13:24

Ахах, олдскул!))


Модератору