Помогите составить программу!очень надо !буду благодарен !№2,3,4,5 кто что сможет!!заранее огромное спасибо

2. uses GraphABC; begin Pie(100, 50, 70, 270, 360); end. 3. uses GraphABC; begin Draw(x -> 2 * cos(x), -pi, pi); end. 4. uses GraphABC; begin Draw(x -> cos(x), -10, 10); Draw(x -> sin(x), -8, 8); end. 5. uses GraphABC; begin Brush.Color := clRandom;  Pie(200, 200, 100, 0, 170);  Brush.Color := clRandom;  Pie(200, 200, 100, 170, 270);  Brush.Color := clRandom;  Pie(200, 200, 100, 270, 300);  Brush.Color := clRandom;  Pie(200, 200, 100, 300, 330);  Brush.Color := clRandom;  Pie(200, 200, 100, 320, 333);  Brush.Color := clRandom;  Pie(200, 200, 100, 333, 360); end. С цветами, думаю, сам разберешься