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

[Глеб Иванов]

Заданы два символьных массива с малых латинских букв и знаков препинания . Разработать программу, которая выводит в алфавитном порядке буквы первого массива, которые не принадлежат втором, и буквы второго массива, не принадлежащих первом.

Если кто может - подкиньте алгоритмы. Буду благодарен


есть пример на Делфи, но нужен Асемблер

procedure TForm1.Button1Click(Sender: TObject);
  var s,c:set of char;
      i:integer;
      m:char;
  begin
      s:=[];
      c:=[];
    if Memo1.Lines.Count <=500 then
    for i:=1 to Memo1.Lines.Count do s:=s+[memo1.lines[i-1][1]] else
       Showmessage('Забагато символів');
    if Memo2.Lines.Count <=400 then
    for i:=1 to Memo2.Lines.Count do c:=c+[Memo2.Lines[i-1][1]] else
       Showmessage('Забагато символів');
    for m:= 'a' to 'z' do begin
      if (m in s) and (not (m in c)) then Memo5.Lines.Add(m);
      if (m in c) and (not (m in s)) then Memo6.Lines.Add(m);
     end;
     end;

[Аватар]

И что, кто-то должен сделать?

Покажите свои наработки, конкретные вопросы и т.п.

Или в раздел Фриланс если вы не хотите ничего делать, а ищете кого-то, кто выполнит ваши задачи за вознаграждение.

[newerow1989]

Тут не бесплатное бюро переводов!

[ViktorR]

Если кто может - подкиньте алгоритмы. Буду благодарен

Алгоритм прост.
Создаешь еще два массива размером в алфавит - masAB1[] и masAB2[].

Пишешь первую подпрограмму (пусть это - pp1), которая
- очищает элементы массива masAB1[] <-- 0
Что-то типа xor ax,ax mov masAB1[], ax: ассемблера не знаю .
- заполняет этот массив по следующему принципу:
- Очищаются старшие биты символа. Полученный код символа используется как индекс для инкремента элементов массива masAB1[].

Пишешь вторую подпрограмму (пусть это pp2), которая
- очищает элементы массива masAB2[]
- проверяет наличие символа в массиве masAB1[]. Если элемент массива 0 (ноль) -символа нет, то инкремент соответствующего элемента массива masAB2[]

Пишешь третью п/п (pp3), которая проверяет элементы массива - masAB2[].
Если найден не нулевой элемент, то преобразование индекса в символ и вывод результата на экран или в файл.

Если есть два исходных массива mas1 и mas2, то:
Вызываем первую подпрограмму, примерно так:

call pp1 mas1 masAB1 - тут pp1 - имя первой п/п, mas1 - первый массив,
                       masAB1 - массив символов, которые есть в mas1

Затем вторую:

call pp2 mas2 masAB2 - тут masAB2 - массив символов, которые отсутствуют в mas1, но есть в mas2.

Затем третью

call pp3 masAB2 - Получаем результат.

Повторяем вызов:

call pp1 mas2 - тут pp1 - имя первой п/п, а mas2 - второй массив

Затем вторую:

call pp2 mas1.

Затем третью

call pp3 masAB2 - Получаем результат.

Идем к преподу и докладываем ...


PS: Как писал ранее, ассемблера не знаю (ну очень давно это было ...),
так что не взыщи. Просил алгоритм, получи ...

[R71MT]

..ещё можно брать очередной символ из первого массива, и искать его SCASB'ом во-втором. По окончании - отсортировать результат по-возрастанию. Получишь символы в алфавитном порядке.

[ViktorR]

А вот еще один алгоритм. Возможно не самый лучший, но ...
Поскольку в задании ничего не говорится о необходимости сохранять данные в массивах, то:
- Берем первый символ из mas1 и удаляем все такие символы в mas1, а затем и в mas2.
- Повторяем эту операцию для всех символов mas1.
- Сортировку выполняем через п/п PpSort mas.
Вызов типа Call PpSort mas1
- Повторяем сортировку для mas2
Вызов типа Call PpSort mas2

п/п PpSort mas
Очищаем элементы массива masAB.
Просматриваем массив mas и инкрементом устанавливаем элемент массива masAB, порядковый номер которого - номер символа из mas.
Выводим результат.