Skip to content
Permalink
Branch: master
Find file Copy path
Find file Copy path
Fetching contributors…
Cannot retrieve contributors at this time
21 lines (17 sloc) 480 Bytes
# Disan Count
# by Martin del Rio
# https://www.ldpl-lang.org/
DATA:
n is number # Number to count down from
mod is number # Result of the modulo operations
PROCEDURE:
# Get number to count down from
display "Enter a number: "
accept n
while n is greater than or equal to 0 do
modulo n by 2 in mod
if mod is equal to 0 then
display n crlf
end if
in n solve n - 1
repeat
You can’t perform that action at this time.