for i=-9to 2?mid$("C C#D D#E F F#G G#A A#B ",i*2+19,2),"    ",440*2^(i/12)using"%.3f"next