Musical scale: Difference between revisions

Content added Content deleted
Line 502: Line 502:
=={{header|FreePascal}}==
=={{header|FreePascal}}==
<lang pascal>{$mode objfpc}
<lang pascal>{$mode objfpc}
uses windows,math;
uses windows,math;{ windows only }
var
var
Interval:Double = 1.0594630943592953;
Interval:Double = 1.0594630943592953;