program division(output);
  var
    r: real;
begin
  r := 5.0;
  r := r/r;
end.

