pascal - zadanie w załączniku