Deceptive numbers: Difference between revisions

m
→‎{{header|Free Pascal}}: 1e6 from 5min -> 2 min 35 -> 1 min 10
m (→‎{{header|Free Pascal}}: No multiple of 5 like Nigel mentioned)
m (→‎{{header|Free Pascal}}: 1e6 from 5min -> 2 min 35 -> 1 min 10)
Line 123:
sysutils;
const
LIMIT = 100000;//1E6 at home takes over (5 min) now 1m10s
RepInitLen = 13; //Uint64 19 decimal digits -> max 6 digits divisor
DecimalDigits = 10*1000*1000*1000*1000;//1E13
Anonymous user