CLS

c = 1100    'fps
pi = 3.1416
a = .0218   'sq feet
f = 200     'cps
l = 1       'foot

'f = c/2*pi * (a/(l*V)^.5 

PRINT " Volume  dimeter INCH   Frequency       RPM"
FOR V = .5 TO 2 STEP .05
f = c / 2 * pi * (a / (l * V)) ^ .5
PRINT USING "##.##"; V;
'V = pi* R^2 * 1.5  in cubic feet
'V / (pi*1.5)  =  R^2
R = (V / (pi * 1.5)) ^ .5  'R = feet
ri = R * 12                'in inches
diameter = 2 * ri          'in inches

PRINT USING "#########.##"; diameter;

PRINT USING "#########.##"; f;
RPM = (f * 60) / 2
PRINT USING "##########"; RPM
NEXT V
SYSTEM