Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Низкоуровневое программирование > Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM
Регистрация

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

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 10.10.2019, 23:19   #1
DarkBoy9
Новичок
Джуниор
 
Регистрация: 10.10.2019
Сообщений: 1
По умолчанию Алгоритм численного поиска корня уравнения f (x) = 0 методом хорд

Из картинки: -1.5052 - это ожидаемый результат
У меня вывод должен действовать в StartIters, но моя программа прерывается внизу в function. Не могу понять почему она не возвращается наверх в StartIters
Код:
%include "io.inc" 
section .data
    x0 dq -2.0 
    a dq 3.0 
    x1 dq 2.0
    fmt db '%lf' , 10,13,0
section .bss
    log resq 1
    fx0 resq 1
    fxi resq 1
    xi resq 1
section .text
global CMAIN
CMAIN:
    mov ebp, esp; for correct debugging
    mov ecx, 11
    fld qword [x1]
    fstp qword [xi]
    finit
    fld qword [x0]
    fld qword [a]
    fsub st0, st1
    fabs
    fstp qword [log]
    push dword [log+4]
    push dword [log]
    call flog
    fadd st0, st1
    fstp qword [fx0]
StartIters:
    call function
    loop StartIters
    push dword [xi + 4]
    push dword [xi]
    push fmt
    call printf
    add esp, 12
    ret
flog: ; ln x
    fld qword [esp + 4]
    fldln2
    fxch
    fyl2x
    ret
iter:
    finit
    fld qword [xi]
    fld qword [fxi]
    fld qword [fx0]
    fsubr st1
    fld qword [x0]
    fxch st3
    fst st4
    fsub st0, st3
    fmul st0, st2
    fdiv st0, st1
    fsubr st0, st4
    fstp qword [xi]
    ret
function:
    finit
    fld qword [xi]
    fld qword [a]
    fsub st0, st1
    fabs
    fstp qword [log]
    push dword [log+4]
    push dword [log]
    call flog
    fadd st0, st1 
    fstp qword [fxi]
    call iter
    ret
Изображения
Тип файла: png Снимок.PNG (11.9 Кб, 68 просмотров)
DarkBoy9 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Написать программу решения уравнения методом дихотомии, комбинированным методом секущих хорд, методом простых итераций (на C++) Bloody_Mary Помощь студентам 0 14.05.2014 21:05
Могут ли методы касательных и хорд дать точное значение корня уравнения? now2 Помощь студентам 8 28.03.2014 00:05
Найти корень уравнения методом хорд alilar Помощь студентам 0 18.08.2012 16:39
Решение уравнения методом Хорд (паскаль) Delllinger Помощь студентам 0 05.06.2011 16:46
решение уравнения методом хорд и методом Ньютона Маргоша)) Общие вопросы Delphi 1 21.04.2010 20:40