LOL i found a Vintage BASIC compiler. [the ones that allow GOTO
  you have to pay hundreds of dollars for or are old].

  Anyway:

  20 FOR X=1 TO 1000
  30 PRINT X
  40 IF X/2=X/3 THEN GOTO 40
  50 FOR Y=1000 TO 1 STEP -1
  55 PRINT Y
  60 IF X*Y < X+Y THEN GOTO 20
  70 NEXT Y
  80 NEXT X

  gave me:

  Now, try to get from the RESULTS to find the CAUSES without
  knowing the causes (code) ahead of time. tongue emoticon[1]10-1

References

  Visible links
  1. http://icopiedyou.com/wp-content/uploads/2015/07/10-1.jpg