for i:=0 to 9 do begin
    winkel := i*36;
    if (i mod 2) = 0 then
        radius := 100
    else
        radius := 70;

    [x-/y-koordinaten in abhaengigkeit von radius und winkel berechnen]

    canvas.lineto(x, y);
end;