Question

How to convert byte to double in Pascal

Answer 1

program ByteToDoubleConversion;

var
  byteValue: Byte;
  doubleValue: Double;

begin
    byteValue := $40;  
    doubleValue := Double(byteValue);  // Typecasting byte to double

    // Displaying double value with 2 decimal places
    WriteLn('Double value: ', doubleValue:0:2);  
end.



(*
run:

Double value: 42.00

*)

 

70+ SQL courses for beginners and professionals