24 game/Solve: Difference between revisions
Content added Content deleted
mNo edit summary |
m (→{{header|REXX}}: realigned statements.) |
||
Line 6,132: | Line 6,132: | ||
x.e= 1 /*mark this expression as being used. */ |
x.e= 1 /*mark this expression as being used. */ |
||
end |
end |
||
interpret 'x=(' e ") / 1" /*have REXX do the heavy lifting here. */ |
|||
if x\==?? then do /*Not correct? Then try again. */ |
|||
numeric digits 9; x= x / 1 /*re-do evaluation.*/ |
|||
numeric digits 12 /*re-instate digits*/ |
|||
if x\==?? then iterate /*Not correct? Then try again. */ |
|||
end |
|||
finds= finds + 1 /*bump number of found solutions. */ |
finds= finds + 1 /*bump number of found solutions. */ |
||
if \show | negatory then return finds |
if \show | negatory then return finds |