% % % % % % % % % % % % % % % % % % % % % % % % % % % % % 
% Dieses Programm mit dem Namen Einheitsmatrix.m liest   
% eine Zahl n ein und berechnet dann die (n,n)          
% Einheitsmatrix.                                       
% % % % % % % % % % % % % % % % % % % % % % % % % % % % % 

  disp('Dieses Programm liest eine Zahl n ein ')
  disp('und berechnet dann die (n,n) Einheitsmatrix.');
  disp(' ');
  n = input('Bitte nun eine natuerliche Zahl n eingeben: ');
  disp(' ');
  disp(['Die von Ihnen eingegebene Zahl war n = ',num2str(n)]);

  % Berechnung der n. Einheitsmatrix:
  
  A = eye(n);
 
  disp('Die zugehoerige Einheitsmartix ist:')
  disp(' ')
  disp(A)