try  
	{
		int x= 0 ;
		int y= 1 ;
		int z=y/x;
	}
	catch (...)
	{
		MessageBox("Error Detecting\n"
			"Деление на НОЛЬ !\n");
	} }

try 
integer x1
integer y1
integer z1

//	try
   x1= 0 
   y1= 1 
   z1=y1/x1
catch (RuntimeError re)
   if re.number =  0  then
      MessageBox("","Error Detecting~n" + &
			"Деление на НОЛЬ !~n")
  end if
end try

// ниже трансляция не выполняется
// поэтому я поменял на как ВЫШЕ ПОКАЗАНО

try 
integer x
integer y
integer z

//	try
   x= 0 
   y= 1 
   z=y/x
catch (RuntimeError re)
   if re.number =  0  then
      MessageBox("","Error Detecting~n" + &
			"Деление на НОЛЬ !~n")
  end if
end try
Information C0148: The identifier ‘x’ conflicts with an existing property with this name. 
The new definition of ‘x’ will take precedence and the prior value will be ignored until this 
и так далее до  1  километра текста!
Information C0148: The identifier ‘y’ conflicts with an existing property with this name. 
The new definition of ‘y’ will take precedence and the prior value will be ignored until this 
и так далее до  1  километра текста!