このファイル: /home/web6047/www/cgi-bin/prj/20190429-CASLII/20190429-WCASL-II 1.08/_work/20190502-P252-1.cas
1
;練習問題: X÷Yの商と余りを求めるプログラムを書きなさい。
2
3
SAMPLE START
4
LD GR0,X
5
LD GR1,Y
6
XOR GR2,GR2
7
LOOP SUBA GR0,GR1
8
JMI LABEL1
9
ADDA GR2,=1
10
JUMP LOOP
11
LABEL1 ADDA GR1,GR0
12
ST GR2,SYOU
13
ST GR1,AMARI
14
RET
15
X DC 12
16
Y DC 3
17
SYOU DS 1
18
AMARI DS 1
19
END