标题活期储蓄利率计算

　　4 HOME
　　80 PRITN"####活期储蓄计算程序####"
　　82 PRINT
　　84 PRINT"请键入前次与本次的存取款日期："
　　86 PRINT
　　100 INPUT“格式为：年，月，日”；N1，Y1，R1
　　110 INPUT“格式为：年，月，日”；N2，Y2，R2
　　130 LET Z2=N2-N1
　　132 IF N2<N1 THEN PRINT“输入数据错误，请重来。”：GOTO 100
　　140 LET Z3=Y2-Y1
　　150 LET Z4=R2-R1
　　152 PRINT：“请键入余额(钱数)：”
　　160 INPUT“格式为：元，角，分”；Q1
　　170 Q2=INT(Q1)
　　180 LET B2=.0810*Z2*Q2:B6=INT(B2*100+.5)/100
　　190 LET B3=.0015*Z3*Q2:B7=INT(B3*100+.5)/100
　　200 LET B4=.00005*Z4*Q2:B8=INT(B4*100+.5)/100
　　210 LET B5=B6+B7+B8+Q1
　　220 PRINT“您的本息合计为；”；B5；“元”
　　222 PRINT
　　230 INPUT“按1键，回车__结束！按空格键，回车__继续！”；Y
　　240 IF HFODO4
　　45 ME0PRINT:PRINT
　　250 PRINT“再见！”：END