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; |