Реализация простого сервера на FreePascal