Computing Fret Positions (Microsoft GWBASIC)

5 INPUT "Distance from Bridge to Nut? ",L 10 C = 2^(1/12)
14 LPRINT:LPRINT
15 LPRINT "Distance from Bridge to Nut =";L 16 LPRINT:LPRINT
19 LPRINT O,L,O
20 FOR I = 1 TO 36 25 D = 1/C^I
30 LPRINT I, L*D, L*(1-D) 40 NEXT I
45 LPRINT CHR$(12) 49 SYSTEM
50 END