24 game/Solve: Difference between revisions

Content added Content deleted
m (→‎{{header|REXX}}: removed the need for the commas function.)
m (→‎{{header|REXX}}: elided the use of shortcuts for range of the SOLVE function.)
Line 6,013: Line 6,013:
nq._= nq._ + 1
nq._= nq._ + 1
end /*jq*/
end /*jq*/
gLO= 1111
gHI= 9999
if ??==24 then do; gLO= 1118; gHI=9993; end /*24: lowest poss.# that has solutions*/


do gggg=gLO to gHI
do gggg=1111 to 9999
if pos(0, gggg)\==0 then iterate /*ignore values with zeroes. */
if pos(0, gggg)\==0 then iterate /*ignore values with zeroes. */
if verify(gggg, qqqq)\==0 then iterate
if verify(gggg, qqqq)\==0 then iterate