Temperature conversion: Difference between revisions
Content added Content deleted
Line 135: | Line 135: | ||
R 37.80 |
R 37.80 |
||
</pre> |
|||
=={{header|Erlang}}== |
|||
<lang erlang>% Implemented by Arjun Sunel |
|||
-module(temp_conv). |
|||
-export([main/0]). |
|||
main() -> |
|||
conversion(21). |
|||
conversion(T) -> |
|||
io:format("\nK : ~p\n\n",[f(T)]), |
|||
io:format("C : ~p \n\n",[f(T - 273.15)]), |
|||
io:format("F : ~p\n\n",[f(T * 1.8 - 459.67)]), |
|||
io:format("R : ~p\n\n",[f(T * 1.8)]). |
|||
f(A) -> |
|||
(round(A*100))/100 . |
|||
</lang> |
|||
{{out}} |
|||
<pre> |
|||
K : 21.0 |
|||
C : -252.15 |
|||
F : -421.87 |
|||
R : 37.8 |
|||
ok |
|||
</pre> |
</pre> |
||