Ziele Untersuchung
mit Columbo Integrität von
Datenbanken Interaktion und
Portierbarkeit Ergonomie der
Schnittstellen

Angebot Produkte Projekt Beratung

Mittel Analytik Modellierung Sprachen Algebra Logik Hardware Denken Kreativität

Zusammenhänge Gesellschaft Wirtschaft Branche Firma


products/Sources/formale Sprachen/VDM/VDMSL/PlannerSL/ (Wiener Entwicklungsmethode ^©) Datei vom 13.4.2020 mit Größe 1 kB

Quelle copro.asm Sprache: unbekannt

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%