10 INPUT A,B,H:P=0:X=A
20 IF X>=(A+B)/2 THEN FOR X=(A+B)/2+H/2 TO B STEP H/2:P=1 ELSE FOR X=A TO (A+B)/2 STEP H
30 PRINT X;SIN(X)
40 NEXT:IF P=0 THEN GOTO 20