MengerMesh

MengerMesh[n] gives a mesh region representing the nth-step Menger sponge. 

MengerMesh[n,d] gives the nth-step Menger sponge in dimension d.

Please visit the official Wolfram Language Reference for more details and examples on core symbols.