Форум программистов
 
Расширенный поиск
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Низкоуровневое программирование > Assembler
Регистрация

Восстановить пароль
Повторная активизация e-mail

Ответ
 
Опции темы
Старый 02.12.2017, 20:27   #1
Mysuki
Новичок
 
Регистрация: 02.12.2017
Сообщений: 1
Репутация: 10
По умолчанию Работа с процедурой

Задача:

(x+2)2-(y-3)2,если x2-y2<2
z=
x2-y2-1,иначе


вот пример моей программы :

.586

.model flat,stdcall

extern ExitProcess@4:near

includelib c:\masm32\lib\user32.lib
includelib C:\masm32\lib\kernel32.lib

data segment

x DB 2

y DB 0

z DW ?

data ends


text segment
start:
MOV AL,X
MOV CL,Y
CALL PR

SUB BX,AX
CMP BX ,2

JL A1

DEC BX

JMP FIN

A1:MOV AL,X
ADD AL,2
MOV CL,Y
SUB CL,3
SUB BX,AX

FIN:MOV Z,BX
push 0
call ExitProcess@4

PR PROC
IMUL AL
MOV BX,AX
MOV AL,CL
IMUL AL
RET

PR ENDP




text ends
end start


Возможно ли это оптимизировать , если да , то как ?
Mysuki вне форума   Ответить с цитированием
Ответ



Опции темы

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

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Работа с массивом и процедурой. Настя М Помощь студентам 5 21.12.2013 23:22
Работа с процедурой (Delphi) sergio212 Помощь студентам 4 01.11.2012 16:45
Работа с хранимой процедурой MargoNik БД в Delphi 13 14.05.2009 20:53
Помогите с процедурой... Arkuz Помощь студентам 10 15.05.2008 08:56




10:23.


Powered by vBulletin® Version 3.8.8 Beta 2
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.

купить трафик


как улучшить посещаемость, а также решения по монетизации сайтов, видео и приложений

RusProfile.ru


Справочник российских юридических лиц и организаций.
Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru