How to complete this cycle?

Question

C++ / C#

___________________________________________________________
_______________________________

Answer 1

Offhand so

uses math;
for i := 0 to 100 do
begin
  point := sin(DegToRad(6*pi/100 + i));
  ...
end;

fmx

Path1.Data.Clear;
Path1.Data.MoveTo(TPointF.Zero);
for var i := 0 to 1000 do
begin
  var Pt := TPointF.Create(i * 10, sin(DegToRad(6*pi/1000+i)));
  Path1.Data.LineTo(Pt);
end;