//valid,233168 //:END: import "../std.qbl" true 3 0 while { // i sum dup check req req + incAndCheck req } deq intToStr println function int => int check { 3 dup % 0 req != req // not_divisible start if { 5 dup % 0 req != req if { deq 0 } } } function int => bool int incAndCheck { 1 + 1000 dup < req }