Boris.. el codigo es muy facil de hacer.. por favor piensa un poco.. te colocare un codigo pseudoformal de la forma ineficiente de hacerlo..

Para i=1 hasta N hacer
Para j=1 hasta M hacer
si (i==j) entonces
Matriz(i,j)=1
en caso contrario
Matriz(i,j)=0

El resultado es una matriz identidad de NxM, donde en este caso debe ser cuadrada por supuesto..

Saludos.

XMan