Rosetta Code

Harshad or Niven series: Difference between revisions

← Older editNewer edit →
Content deleted Content added
Nig (talk | contribs)
557 edits
Nig (talk | contribs)
557 edits
m →‎{{header|AppleScript}}: "Idiomatic" version: removed an unnecessary repeat from the test code.
Line 192:
end repeat
 
-- set h to 0nextHarshad(1000)
 
repeat until (h > 1000)
set h to nextHarshad(h)
end repeat
return {harshads, h}</lang>
 
Retrieved from "https://rosettacode.org/wiki/Harshad_or_Niven_series"