Largest palindrome product: Difference between revisions
→{{header|Delphi}}
No edit summary |
|||
Line 424:
=={{header|Delphi}}==
{{works with|Delphi|6.0}}
{{libheader|uses Windows,SysUtils,StdCtrls,Math}}
<syntaxhighlight lang="Delphi">
type TProgress = procedure(Percent: integer);
function ReverseNum(N: int64): int64;
{Reverse the digit order of a number}
Line 511 ⟶ 514:
4 9901 9999 99000099
</pre>
=={{header|F_Sharp|F#}}==
|