DIM X, A, B AS INTEGER A = 0 : B = 0 INPUT(X) WHILE X > 5 IF X MOD 5 < 2 THEN A = A + 1 END IF IF X MOD 5 > 2 THEN B = B + 1 END IF X = X \ 5 WEND PRINT A, B