Difference between revisions of "Angle16Deg/fr"
From Free Pascal wiki
Jump to navigationJump to searchm |
m (Fixed syntax highlighting) |
||
Line 9: | Line 9: | ||
Convert Angle16Deg to [[Radian/fr|radian]] | Convert Angle16Deg to [[Radian/fr|radian]] | ||
− | <syntaxhighlight> | + | <syntaxhighlight lang=pascal> |
function Angle16DegToRad(const a_angle16deg:integer):double; | function Angle16DegToRad(const a_angle16deg:integer):double; | ||
Line 22: | Line 22: | ||
Convert radian to Angle16Deg | Convert radian to Angle16Deg | ||
− | <syntaxhighlight> | + | <syntaxhighlight lang=pascal> |
function RadtoAngle16Deg(const a_radian:double):integer; | function RadtoAngle16Deg(const a_radian:double):integer; |
Latest revision as of 07:25, 9 February 2020
│
English (en) │
français (fr) │
L'unité angle16deg est 1/16ème de degré. Par exemple, un cercle fait 5760 (= 16*360).
Fonction Angle16DegToRad
Convert Angle16Deg to radian
function Angle16DegToRad(const a_angle16deg:integer):double;
begin
result := a_angle16deg * Pi / ( 180 * 16 );
end;
Fonction RadtoAngle16Deg
Convert radian to Angle16Deg
function RadtoAngle16Deg(const a_radian:double):integer;
begin
result := round ( a_radian * 180 * 16 / Pi );
end;