Largest palindrome product: Difference between revisions
→{{header|XPL0}}: faster version (226 vs. 99 ms on Pi4)
m (→{{header|Ring}}: keeping it odd) |
(→{{header|XPL0}}: faster version (226 vs. 99 ms on Pi4)) |
||
Line 255:
[Max:= 0;
for M:= 100 to 999 do
for N:=
[Prod:= M*N;
if Prod/1000 = Rev(
if Prod > Max then Max:= Prod;
];
| |||