RosettaCodeData/Task/Multifactorial/EasyLang/multifactorial.easy

14 lines
187 B
Text
Raw Permalink Normal View History

2023-12-16 21:33:55 -08:00
func mfact n k .
r = 1
while n > 1
r *= n
n -= k
.
return r
.
for k = 1 to 5
write "degree " & k & ":"
2026-04-30 12:34:36 -04:00
for n = 1 to 10 : write " " & mfact n k
2023-12-16 21:33:55 -08:00
print ""
.