Последние записи
- TChromium (CEF3), сохранение изображений
- Как в Delphi XE обнулить таймер?
- Изменить цвет шрифта TextBox на форме
- Ресайз PNG без потери прозрачности
- Вывод на печать графического файла
- Взаимодействие через командную строку
- Перенести программу из Delphi в Lazarus
- Определить текущую ОС
- Автоматическая смена языка (раскладки клавиатуры)
- Сравнение языков на массивах. Часть 2
Интенсив по Python: Работа с API и фреймворками 24-26 ИЮНЯ 2022. Знаете Python, но хотите расширить свои навыки?
Slurm подготовили для вас особенный продукт! Оставить заявку по ссылке - https://slurm.club/3MeqNEk
Online-курс Java с оплатой после трудоустройства. Каждый выпускник получает предложение о работе
И зарплату на 30% выше ожидаемой, подробнее на сайте академии, ссылка - ttps://clck.ru/fCrQw
16th
Май
Написать программу, считывает с клавиатуры определенное колличество цифр, а на экран выводит сумму наибольшей цифры
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
Случайные статьи
Купить рекламу на сайте за 1000 руб
пишите сюда - alarforum@yandex.ru
Да и по любым другим вопросам пишите на почту
пеллетные котлы
Пеллетный котел Emtas
Наши форумы по программированию:
- Форум Web программирование (веб)
- Delphi форумы
- Форумы C (Си)
- Форум .NET Frameworks (точка нет фреймворки)
- Форум Java (джава)
- Форум низкоуровневое программирование
- Форум VBA (вба)
- Форум OpenGL
- Форум DirectX
- Форум CAD проектирование
- Форум по операционным системам
- Форум Software (Софт)
- Форум Hardware (Компьютерное железо)