Update and rename ejercicio14.pas to E14P1.pas