Temperature conversion: Difference between revisions
Content added Content deleted
(Added Prolog) |
(PascalABC.NET) |
||
Line 3,794: | Line 3,794: | ||
671.67 in degrees Rankine. |
671.67 in degrees Rankine. |
||
</pre> |
</pre> |
||
=={{header|PascalABC.NET}}== |
|||
<syntaxhighlight lang="delphi"> |
|||
## |
|||
var k := ReadReal('Enter Kelvin Temperature:'); |
|||
Println('Celsius:',k - 273.15); |
|||
Println('Fahrenheit:',k * 1.8 - 459.67); |
|||
Println('Rankine:',k * 1.8); |
|||
</syntaxhighlight> |
|||
{{out}} |
|||
<pre> |
|||
Enter Kelvin Temperature: 21 |
|||
Celsius: -252.15 |
|||
Fahrenheit: -421.87 |
|||
Rankine: 37.8 |
|||
</pre> |
|||
=={{header|Perl}}== |
=={{header|Perl}}== |