Rosetta Code

N'th: Difference between revisions

Page Discussion

N'th (view source)

Revision as of 22:35, 8 September 2023

243 bytes removed ,  8 months ago
m
→‎{{header|EasyLang}}
Line 2,245:
=={{header|EasyLang}}==
<syntaxhighlight lang="easylang">
procfunc$ nth num . ordinal$ .
num$last2 = num mod 100
lastTwoDigits$last = substr num$ len num$ - 1mod 210
lastDigit$if last2 >= substr11 num$and lenlast2 num$<= 113
ordinal$ =return num$ & "rdth"▼
if lastTwoDigits$ = "11" or lastTwoDigits$ = "12" or lastTwoDigits$ = "13"
elif ordinal$last = num$ & "th"1
elif lastDigit$ = return num & "1st"
elif ordinal$last = num$ & "st"2
elif lastDigit$ = return num & "2nd"
elif ordinal$last = num$ & "nd"3
elif lastDigit$ = return num & "3rd"
▲ ordinal$ = num$ & "rd"
else
ordinal$ =return num$ & "th"
.
.
print "0 to 25:"
for i = 0 to 25
write nth i ordinal$& " "
write ordinal$
write " "
.
print ""
print "250 to 265:"
for i = 250 to 265
write nth i ordinal$& " "
write ordinal$
write " "
.
print ""
print "1000 to 1025:"
for i = 1000 to 1025
write nth i ordinal$& " "
write ordinal$
write " "
.
</syntaxhighlight>
Chkas
1,969

edits

Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/352365"