realslong
begin
  real r
  integer a, b, i

  r = i
  
  r = i * 1

  r = i * 1.0
  
  i = INTPT(r)
  
  i = a // b

  r = a / b

  r = a // b

endofprogram