Воскресенье, 19.05.2024, 17:17
 

Меню сайта

Форма входа
Друзья сайта
Статистика
Наш опрос
Соскучились ли Вы по университету?
Всего ответов: 96
[Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Модератор форума: SPA, FeniX  
Форум » Помощь студентам! » Assembler » Я тут написала программу...=лаб.раб№6
Я тут написала программу...=лаб.раб№6
AdminДата: Среда, 16.04.2008, 19:09 | Сообщение # 1
General Admin
Группа: Администраторы
Сообщений: 502
Награды: 0
Статус: OffLine
Эту программу я написала давно... и сдала на "отлично". Ну а Вам она может поможет...
ЗАДАНИЕ:
У двомірному масиві обчислити середнє арифметичне значення елементів кожного стовпцю та записати його у останній строчці (додавши її).

МОЕ РЕШЕНИЕ

model small
stack 256
.data

mass1 db 2h,3h,4h,1h
db 2h,3h,4h,3h
db 2h,3h,4h,5h
db 0h, 0h, 0h, 0h
;----------------------------
row db 4
col db 4

.CODE
;.STARTUP
; org 100h

start1:
mov ax, @data
mov ds, ax
; ----------------------------
; -----------------------------
push DS
push SI
push DX
push CX
push BX
push AX

lea dx,DGROUP:mass1
mov bp, dx
; ====================================
mov cx, 4
mov si, 0h ; col counter
com1:
xor ax, ax
xor dx, dx
; -L1-----------------
push cx
push bp
push si
mov cx, 3 ; row counter ( 0,1,3)
c2:
add al, DS:[bp][si]
add bp, 4 ; next row
loop c2

; (AL) - sum(col)
; -------------------
CBW
; -------------------
mov dl, 3
div dl
mov DS:[bp][si],al ; row = 4

pop si
pop bp
pop cx
; -L1------------------
; mov DS:[bp][si],al
inc SI ; next col
loop com1

; ====================================
pop AX
pop BX
pop CX
pop DX
pop SI
pop DS
; -----------------------------

; ----------------------------
mov ax, 4C00H
int 21H
end start1


Умное лицо - это еще не признак ума. Все глупости в мире совершаются именно с этим выражением лица... Улыбайтесь господа, улыбайтесь!
 
AdminДата: Среда, 16.04.2008, 19:10 | Сообщение # 2
General Admin
Группа: Администраторы
Сообщений: 502
Награды: 0
Статус: OffLine
Печально только то, что при копировании полетела табуляция... В отчете она у меня смотрелась намного красивее... biggrin

Умное лицо - это еще не признак ума. Все глупости в мире совершаются именно с этим выражением лица... Улыбайтесь господа, улыбайтесь!
 
AdminДата: Пятница, 18.04.2008, 00:22 | Сообщение # 3
General Admin
Группа: Администраторы
Сообщений: 502
Награды: 0
Статус: OffLine
Товарищи студенты! Хочу предложить Вашему вниманию некий простой код, который облегчит ВАМ жизнь:

tasm.exe Х /la
tlink Х /t

Где Х.asm- название Вашего файла. Этот код Вы набираете в блокноте и сохраняете с расширением *.bat
Потом нажимаем ENTER in Total(Windows) Commander or Far. И создается все, что Вам нужно!


Умное лицо - это еще не признак ума. Все глупости в мире совершаются именно с этим выражением лица... Улыбайтесь господа, улыбайтесь!
 
Форум » Помощь студентам! » Assembler » Я тут написала программу...=лаб.раб№6
  • Страница 1 из 1
  • 1
Поиск:




Администратор сайта - Алена © 2024

Ваш
IP: 3.135.199.27