Написать программу, считывает с клавиатуры определенное колличество цифр, а на экран выводит сумму наибольшей цифры

Posted by Chas under assembler

Нужно написать программу, считывает с клавиатуры определенное колличество цифр, а на экран выводит сумму наибольшей цифры, и цифру, стоящую на пятом месте в введенной строке

zhan313

code segment para public 'code'

assume cs:code,ds:code,ss:code,es:code

org 100h

start:

jmp m1000

np1 db 'BBedite 4isla$'

max1 db 100

rd1 db ?

str1 db 101 dup(?)
m1000:

mov ah, 09h

lea dx, np1

int 21h
mov ah,2

mov dl,0ah

int 21h

mov dl,0dh

int 21h
mov ah,10

lea dx,max1

int 21h
mov ah,2

mov dl,0ah

int 21h

mov dl,0dh

int 21h
lea si,str1 ; ищем наибольшую цифру

mov ch,0

mov cl,rd1

mov dl,0

m1:

cmp dl,[si]

ja m2

mov dl,[si]

m2:

inc si

loop m1
lea si,str1

add dl,[si+4] ; наибольшая+5-я цифра

sub dl,60h ; переводим в число

mov dh,dl

cmp dh,10 ; сумма >= 10

jb m3

sub dh,10 ; выделяем единицы из суммы

mov dl,'1' ; выводим 1 (сумма не превышает 18)

int 21h

m3:

mov dl,dh ; выводим единицы суммы

add dl,'0' ; преобразуем в символ

int 21h
mov ah,4ch

int 21h

code ends

end start

тема на форуме

Случайные статьи

• Вставка название файла в ячейку листа Excel
• Как сравнить переменную с набором чисел?
• ГРАФИКА В DELPHI
• Прозрачность для нескольких цветов Image
• Где вы храните сниппеты (куски кода)?
• Горячие клавиши в приложении
• Сохранить в конец файла из TStringList
• Глобальное потепление или кризис среднего возраста
• Обращение к колонтитулу Word
• Как в компоненте TWebbrowser убрать полосы прокрутки?