%6EJUMJZZE1 ******************* RRCONST ******************* +;@,;@, ((  ŠƠέԠ ,, $THIS PROGRAM WILL CALCULATE THE RATE#** "RETURN OF AN INVESTMENT COSTING $A(++ #NOW AND RETURNING $B DURING EACH OF-&& THE NEXT N EQUAL TIME PERIODS.2- - "THE INPUT IS THE INITIALINVESTMENT7** "PERIODIC DOLLAR RETURNS AND NUMBER<  OF PERIODS. F)% ENTER ANY CHARACTER TO BEGIN)d +i6-n   x4 A & INITIAL INVESTMENT *4 B} 6-63 A0% PERIODIC RETURN =)3 B3 A@% NUMBER OF PERIODS=)3 B6-?6-?26-2JN=NUMBER OF PASSES THROUGH LOOP6-((6-%'$+@&+@%,#+6,,O:, ?PA$!6* A!A 6-&6-'@ A, 6-%1. PASS # R=A$.6-%@6 AuPRINTING SUBROUTINE 33 RATE OF RETURN IS A$ % PER PERIOD '' IF THIS DATA IS MONTHLY WE MAY -- %MULTIPLY BY 12 TO GET AN ANNUAL RATE.-- %ENTER 1 FOR THIS COMPUTATION OR ENTER, A5  2 OTHERWISE", BA@*@4 INPUT ERROR. TRY AGAIN7 A A0>"@ > ANNUAL RATE OF RETURN IS A$%( ( ENTER ANY CHARACTER FOR MORE  A D:RRCONST