Sudan function: Difference between revisions
Content added Content deleted
Walterpachl (talk | contribs) (add REXX) |
m (→{{header|Pascal}}: forget "Free " in sub- header) |
||
Line 1,430: | Line 1,430: | ||
=={{header|Pascal}}== |
=={{header|Pascal}}== |
||
==={{header|Pascal}}=== |
==={{header|Free Pascal}}=== |
||
{{trans|Delphi}} |
{{trans|Delphi}} |
||
<syntaxhighlight lang="pascal"> |
<syntaxhighlight lang="pascal"> |