Temperature conversion: Difference between revisions

=={{header|Quackery}}==

All the conversions.

Using the Quackery big number rational arithmetic library <code>bigrat.qky</code>.

<lang Quackery> [ $ "bigrat.qky" loadfile ] now!

[ 5 9 v* ] is r->k ( n/d --> n/d )

[ 1/v r->k 1/v ] is k->r ( n/d --> n/d )

[ 45967 100 v- ] is r->f ( n/d --> n/d )

[ -v r->f -v ] is f->r ( n/d --> n/d )

[ 5463 20 v- ] is k->c ( n/d --> n/d )

[ -v k->c -v ] is c->k ( n/d --> n/d )

[ k->r r->f ] is k->f ( n/d --> n/d )

[ f->r r->k ] is f->k ( n/d --> n/d )

[ r->k k->c ] is r->c ( n/d --> n/d )

[ c->k k->r ] is c->r ( n/d --> n/d )

[ f->k k->c ] is f->c ( n/d --> n/d )

[ c->r r->f ] is c->f ( n/d --> n/d )

[ $->v drop

2dup 10 point$ echo$

say " Kelvins is equal to" cr

k->c 2dup 10 point$ echo$

say " degrees Celcius" cr

c->f 2dup 10 point$ echo$

say " degrees Fahrenheit" cr

f->r 10 point$ echo$

say " degrees Rankine" cr ] is task ( $ --> )

$ "21.00" task</lang>

{{out}}

<pre>21 Kelvins is equal to

-252.15 degrees Celcius

-421.87 degrees Fahrenheit

37.8 degrees Rankine</pre>