Listing of file='39' on disk='vmedia/glbr_22.wvd.zip'
# Sector 263, program filename = '39' 0005 PRINT "A,B,Z,N? (TO END PROGRAM INPUT 0,0,0,0)" 0010 INPUT A,B,Z,N 0015 IF A^2+B^2=0 THEN 99 0020 S=1 0025 FOR I=N TO 1 STEP -1 0030 S=1+(A+I-1)*Z*S/((B+I-1)*I) 0035 NEXT I 0040 PRINT "M=";S 0045 PRINT 0050 PRINT "A,B,Z,N?" 0055 GOTO 10 0099 END