Wap to find if the number is divisible by 3 and 7 or not

CLS

INPUT"ENTER ANY NUMBER";N

IF N MOD 3 = 0 AND N MOD 7 = 0 THEN

PRINT"THE NUMBER IS DIVISIBLE BY 3 AND 7"

ELSE

PRINT"THE NUMBER IS NOT DIVISIBLE B 3 AND 7"

END IF

END