Create zad4.pas