Текст программы в документе.
а можно составить такую программу без описания array? доступны только real, integer, byte, char