honeymoose
/
mumps-demo
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

read cleanup

This commit is contained in:
programarivm 2019-09-26 10:10:09 +01:00
parent 7b07feb800
commit 9e4c22eadb
3 changed files with 3 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
02-user-defined-functions/FactorialByReference.m
View File

@ -1,5 +1,4 @@
write "Enter n: " read "Enter n: ",n,!
read n,!
write n,"! = " write n,"! = "
do factorial(.n) do factorial(.n)
write n,! write n,!

3
02-user-defined-functions/FactorialByValue.m
View File

@ -1,5 +1,4 @@
write "Enter n: " read "Enter n: ",n,!
read n,!
set result=$$factorial(n) set result=$$factorial(n)
write n,"! = ",result,! write n,"! = ",result,!
halt halt

3
02-user-defined-functions/Fibonacci.m
View File

@ -1,5 +1,4 @@
write "Enter n: " read "Enter n: ",n,!
read n,!
set result=$$fibonacci(n) set result=$$fibonacci(n)
write "F(",n,") = ",result,! write "F(",n,") = ",result,!
halt halt