Минимальное число

[Serge_Bliznykov]

  until a+b<=''

знак меньше можно смело убрать

[volvo877]

Как еще уменьшить код я не знаю. Если у кого получится, пишите.

Легко:

var a,b:string;s:^string;
begin
  reset(input, 'input.txt');
  rewrite(output, 'output.txt');
  readln(a);
  read(b);
  repeat
    s:=@a;
    if a+'A'>b+'B' then s:=@b;
    write(s^[1]);
    delete(s^,1,1);
  until a+b=''
end.

Размер = 179, Accepted

[Poma][a]

Господа, ОГРОМНОЕ спасибо! Теперь моё решение кажется танком(не сточки зрения "непробиваемости", а громоздкости), хотя можно было обойтись велосипедом.


И УРААААА решение выше заняло 2 место ТОПа, кстати 1 места занял тоже старый добрый Паскаль, на 1 байт обогнали....
UPD
Господа, у нас почетное 2 место, с результатом 178(= 1 место)! Ура, Ура, Ура!

delete(s^,1,1);

И кстати задачи компилируются на Дельфе => возможно получиться вырвать 1 байт с помощью PString (просто дельфи 1 раз в жизни вижу..)
Вот еще код (= код Plague), но только с одной развилкой (кол-во символов =)

var a,b,s:string;
begin
  reset(input, 'input.txt'); 
  rewrite(output, 'output.txt');
  readln(a);
  read(b);
  repeat
    s:=a;
    if a+'A'>b+'B' then begin 
        s:=b;
        Delete(b,1,1);
    end
    else
        Delete(a,1,1);
    write(s[1])
  until a+b<=''
end.

[Poma][a]

И снова день добрый, судари! Вот возник вопрос : а почему надо в конец строки (в развилке) добавить 'a' или 'b' ? Без данных буков цикл становиться вечным...
Не могли бы Вы прокомментировать данный факт?
И еще 1 вопрос не могут ли возникнуть ошибки из-за разницы 'a' и 'b'?(не обязательно в данной задаче)

[TinMan]

Эти a и b как раз и есть самая большая хитрость тут )). Поиграй с ними. Попробуй поменять их местами, или поставть одинаковые буквы, а также другие буквы/символы.. Если не сможешь разобраться, поясним, но подумать самому будет очень полезно.

[Plague]

Главное чтобы ord('символа') была больше ord('9'), а символы без разницы какие.

[s-andriano]

Сообщение от Poma][a

И снова день добрый, судари! Вот возник вопрос : а почему надо в конец строки (в развилке) добавить 'a' или 'b' ?

Потому что простое сравнение "почти" совпадающих строк разной длины (т.е. короткая строка совпадает с началом длинной) дает неподходящий для данной задачи результат - короткая строка считается меньше.

[Poma][a]

Итак :
1) Прошу прощения за некропостинг(в его слабой мере проявления), и так с тяжелым боем пробился к своей вычислительной единице.(Как не когда сказал великий полководец : "Ещё одна такая победа, и я останусь без" своей главной любви...)
2) Методом проб и ошибок удалось вывести следующую гипотезу :
Совершенно по барабану данному алгоритму какая буква, она нужна лишь для предотвращения не правильного результат, при моменте, когда а или b = ''.
Тоесть при смене букв на :

А     А
А     B
B     A
и прочее

результат был правильным.

[Poma][a]

Не могли бы Вы опровергнуть или подтвердить данную ситуацию?

[Plague]

#36 пост, прочитайте еще раз.
Говорилось об этом уже давно.