Здравствуйте, JonMoxley!
Вы не написали в какой IDE нужно сделать.
Вот в Делфи (Д7)
[code lang=pascal]unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, TeEngine, Series, ExtCtrls, TeeProcs, Chart, Grids,
Menus;

type
TForm1 = class(TForm)
Chart1: TChart;
Series1: TLineSeries;
Series2: TLineSeries;
Button1: TButton;
procedure FormCreate(Sender: TObject);
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;
a,b:double;
implementation

{$R *.dfm}
function f(x:double):double;//функция
begin
f:=exp(sin(2*x));
end;
function f1(x:double):double;//1 производная
begin
f1:=2*cos(2*x)*exp(sin(2*x));
end;
//Подготовка некоторых параметров графиков
procedure TForm1.FormCreate(Sender: TObject);
begin
with Chart1 do
begin
Title.Text.Clear;
Title.Text.Add('Графики функции y=e^sin(2x)');
Title.Text.Add('и ее производной');
Series1.Title:='y=e^sin(2x)';
Series1.SeriesColor:=clRed; //цвет для легенды
Series2.Title:='y=2*cos(2x)*exp(sin(2x)';
Series2.SeriesColor:=clBlue;
end;
a:=-pi;
b:=pi;
end;

procedure TForm1.Button1Click(Sender: TObject);
var x:double;
begin
//построение графиков
x:=a;
while x<=b do
begin
series1.AddXY(x,f(x),'',clRed);
series2.AddXY(x,f1(x),'',clBlue);
x:=x+0.01;
end;
end;

end.
[/code]