Utilice declaraciones de casos en programas PASCAL para convertir las letras A, B, C, D o a, b, c, d en 1, 2, 3, 4 y los caracteres restantes en 5.
programa ex;
var
ch:char;
comenzar
leer(ch);
caso ch de
'a','A':writeln(1);
'b','B':writeln(2);
' c','C':writeln(3);
'd','D':writeln(4);
else writeln(5);
fin;
fin.