Задача по ассемблеру(ввод и вывод)

[Berik10]

Получается есть такой код(его решил мне один хороший человек)Теперь осталось организовать ввод и вывод
@stack segment para stack
db 1024 dup(?)
@stack ends

@data segment
Eps dd ?
Result dd ?
flags dw ?
CrLf db 0Dh, 0Ah, '$'
@data ends

@code segment
assume cs:@code, ds:@data, ss:@stack
main proc
;инициализация сегментного регистра данных
mov ax, @data
mov ds, ax

finit
fld1
fldz
@@repeat:
fld st(1) ;sqrt(i)
fsqrt

fld st(2) ;(i*i+1)
fmul st(0), st(3)
fld1
faddp st(1), st(0)

fdivp st(1), st(0)

fadd st(1), st(0)

fld1
faddp st(3), st(0)

fcomp [Eps]
fstsw word ptr [Flags]
mov ax, [Flags]
sahf

jae @@repeat

fstp [Result]

;завершение программы
mov ax, 4C00h
int 21h
main endp

@code ends

end main

[Мановар]

Сообщение от Berik10

его решил мне один хороший человек

И этот "хороший человек" паша федосеев. И в чем проблема ? Организовывайте, показывайте. Попросите его еще раз, может он вам и напишет.