The following is my
For x=0 To 1 Step 0.0001

Y=(q * x - xF)/(q 1)
0 & lt;=y & lt;=1 and y & gt;=x

Picture1. PSet (* 100 * 100 x, y)
Next x

I think rules y in 0 and 1, and no less than x, y q and xf is input data

CodePudding user response:

For x=0 To 1 Step 0.0001

Y=(q * x - xF)/(q 1)
If (0 & lt;=y) and (y<=1) and (y & gt; Then=x)
Picture1. PSet (* 100 * 100 x, y)
End the if
Next