44 lines
520 B
Text
44 lines
520 B
Text
goto 2
|
|
= 1 $300
|
|
= 2 $301
|
|
* $300 10 $0
|
|
+ 0 $0 $0
|
|
+ 200 $0 $0
|
|
= 1 *0
|
|
* $301 10 $0
|
|
+ 0 $0 $0
|
|
+ 200 $0 $0
|
|
= 2 *0
|
|
print 'a(i) = '
|
|
* $300 10 $0
|
|
+ 0 $0 $0
|
|
+ 200 $0 $0
|
|
print *0
|
|
print endline
|
|
print 'a(j) = '
|
|
* $301 10 $0
|
|
+ 0 $0 $0
|
|
+ 200 $0 $0
|
|
print *0
|
|
print endline
|
|
* $300 10 $0
|
|
+ 0 $0 $0
|
|
+ 200 $0 $0
|
|
* $301 10 $1
|
|
+ 0 $1 $1
|
|
+ 200 $1 $1
|
|
* $300 10 $2
|
|
+ 0 $2 $2
|
|
+ 200 $2 $2
|
|
+ *1 *2 $3
|
|
= $3 *0
|
|
print 'a(i) = '
|
|
* $300 10 $0
|
|
+ 0 $0 $0
|
|
+ 200 $0 $0
|
|
print *0
|
|
print endline
|
|
+ $301 2 $0
|
|
= $0 $300
|
|
print $300
|
|
print endline
|