{* Задача33 *}

REM basic

' Составить программу по обработки ошибок деления на ноль


CLS 
Do 
On Error GoTo WORKER 
INPUT”Введите число Х”;X 
Y=1/X 
PRINT “1/X=”;Y 
Loop 
WORKER 
If ERR=11 Then 
PRINT”Ошибка Х=0” 
PRINT”Конец вычислений” 
End 
End If