fork(2) download
  1. var
  2. f: single;
  3. i: integer = 8;
  4.  
  5. begin
  6. f := i;
  7. writeln(f);
  8. readln;
  9. end.
  10.  
Success #stdin #stdout 0s 276KB
stdin
Standard input is empty
stdout
 8.000000000E+00