Ввести с клавиатуры два числа. проверить, равно ли второе число нулю. если да, то вывести на экран фразу: «на ноль делить нельзя! » если нет, то найти их частное. решить в qbasik

DIM A AS INTEGER
DIM B AS INTEGER
CLS
INPUT A
INPUT B
IF B=0 THEN 
PRINT "НА НОЛЬ ДЕЛИТЬ НЕЛЬЗЯ"
ELSE 
PRINT A/B
END IF