Update cgi.pas

Структурировал.