Create Prac10Ej6.pas