нужно запрограмировать коротко и без лишних операций уравнение

[Hunter557]

запрограмировать на простом ассемблере для комп'ютеров
(я просто новичёк в этой области)

[Ivan_32]

x dq 3.0 ;
N dd 2 ;Входные данные

        fld qword[x]     ;Загружаем X 
	fld st0             ;  st1=st0
	fmul st0,st0     ; st0= x^2
	faddp st1,st0   ; st1 - > st0=  st1+st0 = x^2 + x
	fld1                ; st0 = 1 , st0 -> st1
	fsubp st1,st0   ; st1 -> st0 = x^2+x - 1
	fsqrt              ; sqrt st0
		
	mov eax,1       ; eax = factorial
	mov ecx,[N]    
	factCycle:
	mul ecx          ; eax * ecx
	dec ecx         ; ecx = ecx - 1
	cmp ecx,0      ; if ecx ! = 0 
	jne factCycle  ; jump to factCycle
	mov [N],eax    ; N = factorial
	fidiv dword[N]  ; st0 = числитель дроби
	fstp qword[x]   ; сохраняем результат вычислений в x

[Hunter557]

СПС! только один вопрос - что это (x dq 3.0 ) ?

[airyashov]

при N=0 неверно

[Hunter557]

я вот так написал но не знаю как продолжить - не могу понять как факториал дальше запрограмировать ,и ещё х- может быть не целое число...

.model small
.stack 100h
.data
x dw
y dw?
.code
begin
mov ax,@data
mov ds,ax
finit
fldx
fldx
fmul
fldx
fadd
fld1
fsub

а вот как дальше делать ?

[Mikl___]

Hunter557
наверное вот так

.code
Start: mov ax,@data
        mov ds,ax
	cmp N,1; сравниваем N с единицей
	jna a2; если больше 1 -> вычисляем факториал	
	mov ax,N; если N равно 0 или 1, тогда факториал=1
	dec N
a1:	mul N
	dec N
	jnz a1
	mov fact,ax; вычислили факториал
a2:	finit; инициализируем сопроцессор
	fld X; загрузили Х
	fld st; копировали верхушку стека
	fmul st,st; получили квадрат Х
	fadd; получили X^2 +X
	fld1; загрузили единицу
	fsub; X^2 +X-1
	fsqrt;sqrt(X^2 +X-1)
	fidiv fact; sqrt(X^2 +X-1)/N!
	fstp Y;   Y:=sqrt(X^2 +X-1)/N!
	mov ax,4C00h; конец программы
        int 21h
.data
X dd 2.0
N dw 5; может быть от 0 до 8 включительно
fact dw 1
Y dd ?
end Start

[Stilet]

что это (x dq 3.0 ) ?

Это переменная если не ошибаюсь типа DOUBLE, короче вещественная.
8 байтов по-моему занимает.

[Mikl___]

x dd 3.0 переменная типа короткое вещественное (float), значения от +/-1,18*10^-38 до +/-3,4*10^38, занимает 4 байта
y dq 3.0 переменная типа длинное вещественное (long, double), значения от +/-2,23*10^-308 до +/-1,79*10^308, занимает 8 байт
z dt 3.0 переменная типа расширенное вещественное (long double), значения от +/-3,37*10^-4932 до +/-1,18*10^4932, занимает 10 байт

[Hunter557]

вот так правильно точно (проверил) но это только первая половина а вот ни один предложенный вариант решения факториала не был правильным...
помогите с факториалом...как дальше продолжить программу?

.model small
.stack 100h
.data
x dt 2.0 (здесь может быть любое число как целое так и нет)
y dt ?
.code
begin:
mov ax,@data
mov ds,ax
finit
fld x
fld x
fmul
fld x
fadd
fld1
fsub
fsqrt

[airyashov]

	mov ax,1
	cmp N,1; сравниваем N с единицей
	jna a1
a2:	mul N
	dec N
	jnz a2
a1:
	mov fact,ax; вычислили факториал