# Factorial Calculator
# by Martin del Rio
# https://www.ldpl-lang.org/
# Created for LDPL 1.0
DATA:
result is number
n is number
PROCEDURE:
# Ask for a number
display "Enter a number: "
accept n
# Default result
store 1 in result
# Calculate factorial
while n is greater than 0 do
in result solve result * n
in n solve n - 1
repeat
# Display result
display "Factorial: " result crlf