Rabu, 02 Februari 2011

PROGRAM STACK

NAMA: M Hasbi Sadam A
NIM : sir200922
BAHASA RAKITAN

tuliskan source berikut ke notepad:

.model small

.code

org 100h

mulai:

mov ax,15

mov bx,80


add ax,bx

mov bx,10

xor cx,cx


ulang:

xor dx,dx

div bx

push dx

inc cx

cmp ax,0

jne ulang


cetak:

pop dx

add dl,'0'

call cetak_k

loop cetak


int 20h

cetak_k proc near

mov ah,02

int 21h

ret

cetak_k endp

end mulai

maka akan menghasilkan output: 95


: both;'/>

Tidak ada komentar:

Posting Komentar