Усердно не проверял. При беглом взгляде - правильно.
-- Пн апр 15, 2013 15:09:18 --Я же вам показал методичку - там и спектр и огибающая на одном графике.
Огибающая должна быть не дискретной. Берёте все те же формулы и задаёте ими уже функцию: в интегралах вместо

пишете

, а в определении функций пишете не индекс, а зависимость от

. Находите функции

. Выводите график функции

.
Обращаю внимание, что у вас график построен в зависимости от номера коэффициента ряда Фурье. В этом случае корректность добавления графика огибающей сомнительна.