+ Ответить в теме
Показано с 1 по 9 из 9

Тема: [assembler] Одномерный однобайтовый массив

  1. #1
    coder azze is on a distinguished road
    Регистрация
    23.12.2006
    Возраст
    32
    Сообщений
    10
    Вес репутации
    12

    По умолчанию [assembler] Одномерный однобайтовый массив

    В одномерном однобайтовом массиве A(15) найти среднее арифметическое эл-тов массива(частное и остаток)

    На С++ решил бы запросто, но АСМ это совсем другое, не лажу с ним , помогите с задачкой! Спасибо заранее!

  2. По умолчанию

     
    Хотите избавиться от рекламы? Зарегистрируйтесь
  3. #2
    coder Ramzey is on a distinguished road
    Регистрация
    12.12.2006
    Возраст
    41
    Сообщений
    49
    Вес репутации
    12

    По умолчанию Re: [assembler] Одномерный однобайтовый массив

    Вот решил вспомнить молодось. Может не совсем красиво, но...
    Если че не ясно пиши.
    Вложения
    • Тип файла: zip arr15.zip (1.4 Кб, Просмотров: 27)

  4. #3
    coder azze is on a distinguished road
    Регистрация
    23.12.2006
    Возраст
    32
    Сообщений
    10
    Вес репутации
    12

    По умолчанию Re: [assembler] Одномерный однобайтовый массив

    Все замечательно решили. Спасибо огромное! Но проблемка в том, что учитель не поверит, что это Я решил эту задачу, слишком огромно получилось, думаю если массивы уже будут заданы, всмысле не надо в самой проге их задавать, прога будет намного проще и яснее. Я не заставляю вас это сделать, а прошу, если будет время, упростить. Ещё раз спасибо!!!

  5. #4
    coder Ramzey is on a distinguished road
    Регистрация
    12.12.2006
    Возраст
    41
    Сообщений
    49
    Вес репутации
    12

    По умолчанию Re: [assembler] Одномерный однобайтовый массив

    по-моему 356 байт это не так уж и много.
    Ладно уберу ввод массива( - самое основное!)

  6. #5
    coder Ramzey is on a distinguished road
    Регистрация
    12.12.2006
    Возраст
    41
    Сообщений
    49
    Вес репутации
    12

    По умолчанию Re: [assembler] Одномерный однобайтовый массив

    вот без ввода
    Код asm:
    1.                 .model  tiny
    2.                 .code
    3.                 .data
    4.                 ORG     100h
    5.  
    6. cLenArr         equ     15
    7.  
    8. BEGIN:
    9.                 push    cs
    10.                 pop     ds
    11.  
    12.                 xor     ax, ax
    13.                 mov     cx, cLenArr
    14.                 lea     bx, arr
    15.                 xor     dh, dh
    16. SolveSum:
    17.                 mov     dl, byte ptr[bx]
    18.                 add     ax, dx
    19.                 inc     bx
    20.                 loop    SolveSum
    21.  
    22.                 mov     bx, cLenArr
    23.                 div     bl              ;vychisliaem sr. arifm.
    24.                 lea     bx, chastnoe    ;perevodim chastnoe
    25.                 mov     dh, ah          ;sohr ostatok
    26.                 mov     cx, 2           ;cikl iz 2 raz
    27. nextdiv:
    28.                 xor     ah, ah
    29.                 div     Hundred                 ;vydeliaem sotni
    30.                 mov     byte ptr[bx], al
    31.                 shr     ax,8
    32.                 div     Ten                     ;desiatki
    33.                 mov     byte ptr[bx+1], al
    34.                 mov     byte ptr[bx+2], ah
    35.                 mov     al, dh
    36.                 lea     bx, ostatok             ;perevodim ostatok
    37.                 loop    nextdiv
    38.  
    39.                 mov     cx, 3
    40. ascii1:
    41.                 mov     bx, cx
    42.                 add     byte ptr [ostatok+bx-1], 30h  ;ostatok v ascii
    43.                 loop    ascii1
    44.  
    45.                 mov     cx, 3
    46. ascii2:
    47.                 mov     bx, cx
    48.                 add     byte ptr [chastnoe+bx-1], 30h ;chastnoe v ascii
    49.                 loop    ascii2
    50.  
    51.                 mov     ah, 9
    52.                 lea     dx, strchast
    53.                 int     21h
    54.  
    55.                 mov     ax,4c00h
    56.                 int     21h
    57.      ;nash massiv
    58. arr             db      255,213,12,44,55,99,23,32,123,43,34,234,129,1,10
    59.  
    60. strchast        db      'Chastnoe='
    61. chastnoe        db      '000',13,10
    62. strost          db      'Ostatok='
    63. ostatok         db      '000',13,10,'$'
    64. Ten             db      10
    65. Hundred         db      100
    66.                 END     BEGIN

  7. #6
    coder azze is on a distinguished road
    Регистрация
    23.12.2006
    Возраст
    32
    Сообщений
    10
    Вес репутации
    12

    По умолчанию Re: [assembler] Одномерный однобайтовый массив

    Задача успешно решена, благодарю вас! НО скоро задам другую задачку, она попроще, ждите... Вспомните всю молодость :d

  8. #7
    sweet03 is on a distinguished road
    Регистрация
    26.12.2017
    Возраст
    25
    Сообщений
    2
    Вес репутации
    0

    По умолчанию Re: [assembler] Одномерный однобайтовый массив

    Цитата Сообщение от Ramzey Посмотреть сообщение
    Вот решил вспомнить молодось. Может не совсем красиво, но...
    Если че не ясно пиши.
    Можно как-нибудь посмотреть решение с вводом? Не открывается архив, к сожалению. Спасибо заранее.

  9. #8
    coder Ramzey is on a distinguished road
    Регистрация
    12.12.2006
    Возраст
    41
    Сообщений
    49
    Вес репутации
    12

    По умолчанию Re: [assembler] Одномерный однобайтовый массив

    Оба-на, я еще здесь зареген!!! Неожиданно... 11 лет прошло.
    Последний раз редактировалось Ramzey; 26.12.2017 в 16:42.

  10. #9
    sweet03 is on a distinguished road
    Регистрация
    26.12.2017
    Возраст
    25
    Сообщений
    2
    Вес репутации
    0

    По умолчанию Re: [assembler] Одномерный однобайтовый массив

    Цитата Сообщение от Ramzey Посмотреть сообщение
    Оба-на, я еще здесь зареген!!! Неожиданно... 11 лет прошло.
    11 лет, а проблемы студентов все те же Что с задачей, можно как-то воссоздать?

+ Ответить в теме

Похожие темы

  1. Please HELP with Assembler
    Зарываюсь человеки - сессия :cry: Нужно написать резидентную прогу на ассемблере, которая по нажатию любой комбинации клавиш переключалась с ввода...
    от skid в разделе Решите мне задачку
  2. Pascal: Одномерный массив
    Второй отрицательный элемент массива заменить минимальным.
    от Аликс в разделе задачи на Паскале и Delphi
  3. Одномерный массив
    Задана последовательность N вещественных чисел. Вычислить сумму чисел, порядковые номера которых являются простыми числами. Ну понятно, что...
    от pikass в разделе Delphi и Pascal
  4. Связка Assembler и Delphi
    Здравствуйте всем! Требуется написать функцию сложения двух вещественных чисел. Я работаю с дельфийским ассемблером. Когда я делаю так: mov...
    от Mark в разделе Ассемблер
  5. C++ Bulder 6 и dll написанная на assembler
    Вот текст dll .586P .MODEL Flat,StdCall PUBLICDLL asmproc ; Функция на экспорт .DATA .CODE DLLMain proc hInstDLL:dword, fdwReason:dword,...
    от ZaikinMaxim в разделе C и C++

Ваши права

  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения