How to generate 6 points on the perimeter of the circle with mathemathica?

Question

How to generate 6 points on the perimeter of the circle with mathemathica? The points should not be equally distributed. Thank you very much

Answer 1

Is this what you are looking for?

Table[{t=RandomReal[{0,2Pi}];Cos[t],Sin[t]},{6}]

or are you trying to display those like this?

Graphics[Point[Table[{t=RandomReal[{0,2Pi}];Cos[t],Sin[t]},{6}]]]

or

points=Table[p=RandomReal[{0,2Pi}];{Cos[p],Sin[p]},{6}];
Print[points]
ParametricPlot[{Cos[phi],Sin[phi]},{phi,0,2Pi},
  Epilog->{PointSize[Large],Map[Point,points]}]