var
  f: single;
  i: integer = 8;

begin
  f := i;
  writeln(f);
  readln;
end.