(defparameter modint 998244353)

(defun modpow (x n)
  (let ((res 1))
    (loop
      (when (<= n 0) (return res))
      (when (oddp n)
        (setf res (mod (* res x) modint)))
      (setf x (mod (* x x) modint))
      (setf n (ash n -1)))))

(defun solve (n m)
  (setf n (mod n (* 2 m)))
  (if (<= n m)
      (format t "~d~%" (mod (1- (modpow 10 n)) modint))
    (let* ((a (modpow 10 m))
           (b (modpow 10 (- n m)))
           (ans (mod (- a b) modint)))
      (format t "~d~%" ans))))

(defun main ()
  (let ((num-tests (read)))
    (dotimes (i num-tests)
      (let* ((n (read))
             (m (read)))
        (solve n m)))))

(main)