Largest palindrome product: Difference between revisions

m
→‎Version 2: removed some left code that was used for testing
(→‎{{header|FreeBASIC}}: added a fast secound version)
m (→‎Version 2: removed some left code that was used for testing)
Line 330:
 
Dim As ULongInt np
 
Dim As Double t1 =Timer
For d As UInteger = 2 To 9
For n As UInteger = 10^d -1 To 10^(d -1) Step -1 'count down from 999...
457

edits