% Programa para calcular la letra del DNI
% ========================================
% Algoritmo descrito en wikipedia:
% (https://es.wikipedia.org/w/index.php?title=DNI_(Espa%C3%B1a))

% Borramos pantalla y memoria:
clc;
clear all;


% Creamos la tabla de correspondencias:
tabla='TRWAGMYFPDXBNJZSQVHLCKE';

% Pedimos el número de DNI:
numDNI=input('Dime tu número de DNI: ');

% Obtenemos el resto de dividir por 23:
resto=rem(numDNI,23);

% Como el resto 0 está en la posición 1 de la tabla, el resto 1 en la
% posición 2, el resto 2 en la posición 3, etc., la posicion de la letra en
% la tabla es el valor del resto+1:
letra=tabla(resto+1);

% Mostramos el resultado:
disp("La letra de tu DNI es: "+letra);


