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

View File

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

View File

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

View File

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