OpenEuphoria

Re: OT: How far we have come

• Posted by CoJaBo <cojabo at suscom.net> May 02, 2004
• 505 views

OOPS AGAIN!!! here is the corrected one!(really!)

I have created a program that can "solve" this problem,
probably very similar to the one that was advertised.
It will even work if you changed "chickens" to "ducks" or "geese"!

NOTE: if you don't look at the code, just copy it, it will seem amazing.


include get.e
include misc.e

sequence question
puts(1,"Enter the question: ")
question=gets(0)

puts(1,"\n\nCalculating")
for none=1 to 5 do
	sleep(1)
	puts(1,".")
end for

puts(1,"\n\nThe answer is: 30")
if wait_key() then end if



CoJaBo wrote:
> 
> 
> OOPS! here is the corrected one!
> (read the question wrong...)
> 
> I have created a program that can "solve" this problem,
> probably very similar to the one that was advertised.
> It will even work if you changed "chickens" to "ducks" or "geese"!
> 
> NOTE: if you don't look at the code, just copy it, it will seem amazing.
> 
> 
> <font color="#0000FF">include </font><font color="#330033">get.e</font>
> <font color="#0000FF">include </font><font color="#330033">misc.e</font>
> <font color="#330033"></font>
> <font color="#FF00FF">sequence </font><font color="#330033">question</font>
> <font color="#FF00FF">puts</font><font color="#330033">(1,</font><font
> color="#00A033">"Enter the question: "</font><font color="#330033">)</font>
> <font color="#330033">question=</font><font color="#FF00FF">gets</font><font
> color="#330033">(0)</font>
> <font color="#330033"></font>
> <font color="#FF00FF">puts</font><font color="#330033">(1,</font><font
> color="#00A033">"\n\nCalculating"</font><font color="#330033">)</font>
> <font color="#0000FF">for </font><font color="#330033">none=1 </font><font
> color="#0000FF">to </font><font color="#330033">5 </font><font
> color="#0000FF">do</font>
> <font color="#330033">	sleep(1)</font>
> <font color="#FF00FF">	puts</font><font color="#330033">(1,</font><font
> color="#00A033">"."</font><font color="#330033">)</font>
> <font color="#0000FF">end for</font>
> <font color="#330033"></font>
> <font color="#FF00FF">puts</font><font color="#330033">(1,</font><font
> color="#00A033">"\n\nThe answer is: 10"</font><font color="#330033">)</font>
> <font color="#0000FF">if </font><font color="#330033">wait_key() </font><font
> color="#0000FF">then end if</font>
> 
> 
> CoJaBo wrote:
> > 
> > 
> > I have created a program that can "solve" this problem,
> > probably very similar to the one that was advertised.
> > It will even work if you changed "chickens" to "ducks" or "geese"!
> > 
> > NOTE: if you don't look at the code, just copy it, it will seem amazing.
> > 
> > 
> > <font color="#0000FF">include </font><font color="#330033">get.e</font>
> > <font color="#0000FF">include </font><font color="#330033">misc.e</font>
> > <font color="#330033"></font>
> > <font color="#FF00FF">sequence </font><font color="#330033">question</font>
> > <font color="#FF00FF">puts</font><font color="#330033">(1,</font><font
> > color="#00A033">"Enter
> the question: "</font><font color="#330033">)</font>
> > <font color="#330033">question=</font><font color="#FF00FF">gets</font><font
> > color="#330033">(0)</font>
> > <font color="#330033"></font>
> > <font color="#FF00FF">puts</font><font color="#330033">(1,</font><font
> > color="#00A033">"\n\nCalculating"</font><font
> color="#330033">)</font>
> > <font color="#0000FF">for </font><font color="#330033">none=1 </font><font
> > color="#0000FF">to
> </font><font color="#330033">5 </font><font color="#0000FF">do</font>
> > <font color="#330033">	sleep(1)</font>
> > <font color="#FF00FF">	puts</font><font color="#330033">(1,</font><font
> > color="#00A033">"."</font><font
> color="#330033">)</font>
> > <font color="#0000FF">end for</font>
> > <font color="#330033"></font>
> > <font color="#FF00FF">puts</font><font color="#330033">(1,</font><font
> > color="#00A033">"\n\nThe
> answer is: 10"</font><font color="#330033">)</font>
> > <font color="#0000FF">if </font><font color="#330033">wait_key()
> > </font><font color="#0000FF">then
> end if</font>
> > 
> > 
> > irv mullins wrote:
> > > 
> > > 
> > > Kat wrote:
> > > > 
> > > > On 2 May 2004, at 10:36, irv mullins wrote:
> > > > 
> > > > > First of all, where would the computer obtain the info that a chicken
> > > > > has
> 
> > > > > two legs, and a pig four? 
> > > > > 
> > > > > Further, I wonder what would have happened if you changed "chickens"
> > > > > to
> > > > > "ducks" or "geese". Would it have then been unable to solve the
> > > > > problem?
> > > > 
> > > > I wonder if the lights are coming on yet as to why a large database and 
> > > > multiple programmers and computers are needed. 
> > > > 
> > > > Kat
> > > 
> > > When I ask Google (which has a very large database, many programmners and 
> > > perhaps as many as 80,000 computers) "how many legs does a duck have?", 
> > > I get only one answer, and it's in chinese! ;)
> > > 
> > > That's no help. perhaps if I "ask Jeeves"....
> > > 
> > > How many legs does a Duck have?
> > > How many legs does a Duck have? Answer. Wrong. Correct...
> > > From:www.mtllive.com/MS2/labs/Demo1.html
> > > 
> > > EPICURIOUS: RECIPE: RED-WINE-BRAISED DUCK LEGS WITH ROASTED PEARS
> > > Watch how to make beurre ... duck legs, reserving fat for the sautéed
> > > kale. In
> > a
> > > large bowl marinate duck ... from Chicago on 11/16/00 I have m...
> > > From:www.epicurious.com/db/recipes/recipesH/8/10898.html
<snip>