Вырезать цифры перед последней девяткой числа, включая её саму

@taoariya · Регистрация: 09.10.2017

Студворк — интернет-сервис помощи студентам

Помогите пожалуйста с решение задачи на ассемблере

Вырезать цифры перед последней девяткой числа, включая её саму.
Примеры: 12909123  123, 987654321  87654321, 1000  1000.

ФедосеевПавел · 03.10.2019, 14:53

С числами делал просто - сохранил остатки в стеке, а потом собрал из них результат. Тип данных жёстко определил 32-разрядным, чтобы не зависеть от режима совместимости. Почему-то кажется, что при работе с отрицательными числами потребуются дополнительные действия, поэтому ограничился только положительными.

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
program nines;
 
{$mode Delphi}
{$asmmode intel}
var
  n: uint32;
begin
  readln(n);
  asm
    mov eax, [n]
    mov ebx, 10
    xor ecx, ecx
    @repeat:
      xor edx, edx
      div ebx
      cmp edx, 9
      je @break
      push edx
      inc ecx
      test eax, eax
    jnz @repeat
    @break:
    xor eax, eax
    jecxz @skip
    @for:
      mul ebx
      pop edx
      add eax, edx
    loop @for
    @skip:
    mov [n], eax
  end;
  writeln(n);
end.

@taoariya · 11.10.2019, 08:55 **[ТС]**

Спасибо большое за помощь❤️

@vlisp · 11.10.2019, 10:04

можно гораздо проще:

Pascal
1
2
3
4
5
6
7
8
9
10
11
function r (n : LongWord) : LongWord;
var m : LongWord;
begin
  m := n div 10;
  if n < 10 then
     r := 0
  else
     if (n mod 10) = 9 then
        r := m
     else r := r(m)
end;

@mr-Crocodile · 11.10.2019, 10:52

Сообщение от vlisp

можно гораздо проще:

Садись - ДВА!
ты просто задание не понял.
попробуй взять примеры из первого поста и запустить.

@vlisp · 11.10.2019, 12:56

Сообщение от mr-Crocodile

ты просто задание не понял.

в задании возникает неопределенность, что делать с нулем. впрочем + пару строчек кода и та же функция будет возвращать как в задании. принцип тот же

Новые блоги и статьи Все статьи Все блоги /
Был там один разговор по поводу свободы в материальном мире. kumehtar 19.08.2026 Суть: рассматривается живое существо, оказавшееся внутри довольно странной системы (этого мира) и пытающееся обустроить в ней свой кусок пространства. Жизнь действительно предъявляет каждому. . .	Когда логика программы не спасает от человеческих ошибок Maks 18.08.2026 В последнее время всё чаще и чаще сталкиваюсь с таким явлением, как абсолютная невнимательность (или глупость) пользователей. Проявляется это чаще всего на работе в коллективе. Допустим, человек с. . .	Лето уходит kumehtar 17.08.2026	Мысли в слух kumehtar 17.08.2026 Забавно, насколько сейчас стала доступна информация. Например о магии, духовном развитии, медитациях, и других подобных направлениях, ранее зачастую тайных, передаваемых от учителя к ученику. Хотя. . .
Перемещение строк из ТЧ в другой документ с учетом текущего пробега Maks 17.08.2026 Реализация из решения ниже выполнена на примере нетипового документа "Автозапчасти", с ТЧ "Шины". За основу взят алгоритм отсюда: https:/ / www. cyberforum. ru/ blogs/ 359708/ 10838. html Задача: . . .	Саморегулирующийся социальный контракт для сервера cross-section. Hrethgir 14.08.2026 С кодом конечно таких глубоких размышлений пока не было, впрочем я уже привык к алгоритмизации. Суть предмета записи: снова в диалоге с нейросетью (я взял пока себе ник для учётки админа - Rector). . . .	Часы электронные Uhbif79 12.08.2026 Выкладываю программу часов. Программа позволяет: 1. Использовать системное время и дату, 2. Есть возможность вводить время и дату вручную. 3. Реализованы 2 будильника: начало и конец рабочего дня. . . .	Часы с будильником на основе класса QLCDNumber Uhbif79 12.08.2026 Всем добрый день, выкладываю программу часов с будильником на основе класса QLCDNumber. Здесь я пробовал самостоятельно создавал классы, впервые столкнулся с видимостью переменной одного класса из. . .

@taoariya 2 / 2 / 0 Регистрация: 09.10.2017 Сообщений: 132

	Вырезать цифры перед последней девяткой числа, включая её саму 30.09.2019, 22:47. Показов 2903. Ответов 24 Метки asm, freepascal (Все метки) Помогите пожалуйста с решение задачи на ассемблере Вырезать цифры перед последней девяткой числа, включая её саму. Примеры: 12909123  123, 987654321  87654321, 1000  1000. 0

@taoariya 2 / 2 / 0 Регистрация: 09.10.2017 Сообщений: 132
	11.10.2019, 08:55 [ТС]
	Спасибо большое за помощь❤️ 0