extrn Ausgabe : FAR, Numin : FAR
.MODEL Small
.486
.STACK 100h
.DATA
EinAus DD ?
Faktor DW 10
Text DB "Geben Sie eine Zahl ein: $"
Text2 DB "Wurzel dieser Zahl: $"
CR_LF DB 10,13,"$"
.CODE
mov ax,@data
mov ds,ax
mov ah,09h
mov dx,OFFSET Text
int 21h
xor ecx,ecx
call NumIn
mov EinAus,ecx
mov dx,OFFSET CR_LF
int 21h
fild EinAus
fsqrt
fild Faktor
fmul
fistp EinAus
wait
mov ah,09h
mov dx,OFFSET Text2
int 21h
mov eax,EinAus
call Ausgabe
mov ah,4Ch
int 21h
END
¤ Dauer der Verarbeitung: 0.4 Sekunden
(vorverarbeitet)
¤
|
Haftungshinweis
Die Informationen auf dieser Webseite wurden
nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit,
noch Qualität der bereit gestellten Informationen zugesichert.
Bemerkung:
Die farbliche Syntaxdarstellung ist noch experimentell.
|