16 lines
264 B
Text
16 lines
264 B
Text
10 PRINT "First number"
|
|
20 INPUT A
|
|
30 PRINT "Second number"
|
|
40 INPUT B
|
|
50 IF A<0 THEN LET A=-A
|
|
60 IF B<0 THEN LET B=-B
|
|
70 IF A>B THEN GOTO 130
|
|
80 LET B = B - A
|
|
90 IF A=0 THEN GOTO 110
|
|
100 GOTO 50
|
|
110 PRINT B
|
|
120 END
|
|
130 LET C=A
|
|
140 LET A=B
|
|
150 LET B=C
|
|
160 GOTO 70
|