Angle difference between two bearings: Difference between revisions
Content deleted Content added
m →{{header|REXX}}: added the REXX language. |
m →{{header|REXX}}: used a different delimiter for a quoted string. |
||
Line 179:
/*──────────────────────────────────────────────────────────────────────────────────────*/
show: procedure; parse arg a,b; $='º' /*obtain the 2 angles (are in degrees).*/
say right(a,5)$ ' -'right(b,5)$
return d /* [↑] display the angular difference.*/</lang>
'''output'''
<pre>
Line 190:
-45º - 145º ───► -170º
</pre>
=={{header|zkl}}==
| |||