10 lines
307 B
Plaintext
10 lines
307 B
Plaintext
100 DO
|
|
110 INPUT PROMPT "Ener two integers separated by a comma: ":A,B
|
|
120 IF ABS(A)>1000 OR ABS(B)>1000 OR IP(A)<>A OR IP(B)<>B THEN
|
|
130 PRINT "Both integers must be in the interval [-1000..1000] - try again.":PRINT
|
|
140 ELSE
|
|
150 PRINT "Their sum is";A+B
|
|
160 EXIT DO
|
|
170 END IF
|
|
180 LOOP
|