demo.lpr 177 B

123456789101112
  1. program demo;
  2. {$mode objfpc}{$H+}
  3. uses
  4. ConvUtils;
  5. begin
  6. WriteLn('30 Celsius to Fahrenheit: ', CelsiusToFahrenheit(30));
  7. WriteLn('10 cm to inch: ', CmToInch(10));
  8. end.