I have a random list of points and I would like to execute statement on it, If xPoint^2/2 - yPoint > 0, color that point red.
I have difficulty on executing that algorithm
L=Sequence((RandomBetween(-6,p),RandomBetween(-6,q)),i,1,100)
Sequence[If[ x(Element(L, i))^2/2^2 - y(Element(L, i)) >=0,SetColor(Element(L, counter),"Red")],i,1,50]