Создание единичной

Листинг 7.21. Создание единичной и диагональной матрицы заданной размерности