Assembler #5

%include "gt.asm"
         covar
a:       resd 1
b:       resd 1
c:       resd 1
vier:    dd 4
         inleiding
         inv [a]
         inv [b]
         inv [c]
         mov EAX, [b]
         imul dword [b]
         mov [b], EAX ;[b] = b^2
         mov EAX, [a]
         imul dword [c]
         imul dword [vier]
         mov [a], EAX
         mov EAX, [b]
         sub EAX, [a]
         mov [a], EAX
         uit [a]
         slot