Quelle copro.asm Sprache: Masm

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

quality88%

¤ Dauer der Verarbeitung: 0.14 Sekunden (vorverarbeitet) ¤

Wurzel

Suchen

Beweissystem der NASA

Beweissystem Isabelle

NIST Cobol Testsuite

Cephes Mathematical Library

Wiener Entwicklungsmethode

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.