import Control.Applicative( (<$>))
import Data.List( sortBy)
import Data.Function( on)
import Control.Monad( forM_)

data Direction = LEFT | RIGHT | UP | DOWN

main = do
    let
	readLine = map read . words <$> getLine
    [h_, w_] <- readLine
    _n_ <- readLn::IO Int
    as_ <- readLine
    let
	uzu 0 _ _ _ _ _ _ = []
	uzu n l u b r RIGHT p@(i,j)
	  | j<r		= p:(uzu (n-1) l u b r RIGHT (i,j+1))
	  | otherwise	= p:(uzu (n-1) l u b (r-1) DOWN (i+1,j))
	uzu n l u b r DOWN p@(i,j)
	  | i<b		= p:(uzu (n-1) l u b r DOWN (i+1,j))
	  | otherwise	= p:(uzu (n-1) l u (b-1) r LEFT (i,j-1))
	uzu n l u b r LEFT p@(i,j)
	  | l<j		= p:(uzu (n-1) l u b r LEFT (i,j-1))
	  | otherwise	= p:(uzu (n-1) (l+1) u b r UP (i-1,j))
	uzu n l u b r UP p@(i,j)
	  | u<i		= p:(uzu (n-1) l u b r UP (i-1,j))
	  | otherwise	= p:(uzu (n-1) l (u+1) b r RIGHT (i,j+1))

	poss = uzu (h_*w_) 1 2 h_ w_ RIGHT (1,1)
	
	gridDataList
	  = let
		decode _ [] = []
		decode n (a:as) = replicate a n:(decode (n+1) as)
		as' = concat $ decode 1 as_
		list = zip poss as'
	    in
		sortBy (compare `on` fst) list

	
	printGrid lines
	  = forM_ lines $ \line ->
		do
		forM_ line $	\v -> putStr $ (show v) ++ " "
		putStrLn ""
	
	chops _ [] = []
	chops n list
	  = let
		(sausage, rest) = splitAt n list
	    in
		sausage:(chops n rest)

    printGrid . chops w_ $ snd <$> gridDataList