Create Prac10Ej4.pas