Babbage problem: Difference between revisions

Content deleted Content added
KenS (talk | contribs)
Added FutureBasic example
Line 223:
25264
</pre>
 
=={{header|FutureBasic}}==
<lang futurebasic>
include "ConsoleWindow"
 
dim as long i
 
for i = 1 to 1000000
if i ^ 2 mod 1000000 == 269696 then exit for
next
print "The smallest number whose square ends in 269696 is"; i
print "Its square is"; i ^ 2
</lang>
Output:
<pre>
The smallest number whose square ends in 269696 is 25264
Its square is 638269696
</pre>
 
 
=={{header|Haskell}}==