[delphi] График в полярной системе координат и построение зависимости!!!

[vika18]

2.jpg
Задание 1.Помогите, очень нужно, решить,а то не понимаю)
Задание 2.Вот код но не могу привязать уравнение.Помогите пожалуйста)
1.jpg

unit Unit1;
 
interface
 
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, TeEngine, Series, Grids, ExtCtrls, TeeProcs, Chart;
 
type
  TForm1 = class(TForm)
    Edit1: TEdit;
    Chart1: TChart;
    StringGrid1: TStringGrid;
    Series1: TLineSeries;
    Button1: TButton;
    Button2: TButton;
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;
 
var
  Form1: TForm1;
 
 
 
implementation
 
{$R *.dfm}
 
procedure TForm1.Button1Click(Sender: TObject);
begin
 
  StringGrid1.RowCount:=StrToInt(Edit1.Text)+1;
  StringGrid1.Cells[0,0]:='Io';
  StringGrid1.Cells[1,0]:='a';
 
end;
 
 
 
 
 
procedure TForm1.Button2Click(Sender: TObject);
 
 
var i,j:longint;
begin
  Series1.Clear;
  for i:=1 to StringGrid1.RowCount-1 do
    Series1.AddXY(StrToFloat(StringGrid1.Cells[0,i]),
                  StrToFloat(StringGrid1.Cells[1,i]),
                  '',clGreen);
 
  Chart1.Title.Text.Clear;
end;
 
 
 
end.