8 lines
120 B
Rexx
8 lines
120 B
Rexx
|
Say 'Interrupt this program after a short while'
|
||
|
|
Call on halt
|
||
|
|
Do i=1 To 10000000
|
||
|
|
j=i**2+1
|
||
|
|
End
|
||
|
|
halt: Say i j
|
||
|
|
Return
|