Prevodová tabuľka stupníc teploty C, F, K
Delphi & Pascal (česká wiki)
Category: Homework in Pascal
Author: Pheo
web: pascalsource.ic.cz
Program: Celsius_fahrenheit.pas
File exe: Celsius_fahrenheit.exe
File ubuntu: Celsius_fahrenheit
Author: Pheo
web: pascalsource.ic.cz
Program: Celsius_fahrenheit.pas
File exe: Celsius_fahrenheit.exe
File ubuntu: Celsius_fahrenheit
Prevodová tabuľka stupníc teploty C, F, K. Vykoná prevod medzi stupňom celzia, fahrenheit a kelvin.
{ CELSIUS_FAHRENHEIT.PAS Copyright (c) Pheo } { Prevodová tabužka stupníc teploty C, F, K. } { Vykoná prevod medzi stupňom celzia, fahrenheit a kelvin. } { } { Datum:30.05.2000 http://www.trsek.com } program celsius_fahrenheit; var f,c:real; begin writeln('Prevodová tabulka stupníc teploty C, F, K.'); writeln('Vykona prevod medzi stupnom celzia, fahrenheit a kelvin.'); writeln; writeln('Zadaj stupne celzia :'); readln(c); f:= c*(9/5)+35; writeln(c:5:1,' C = ',f:5:1,' F'); readln; end.