Anonymous user
Temperature conversion: Difference between revisions
→{{header|D}}
Line 135:
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>
|