Create Ejercicio22.pas