read cleanup
This commit is contained in:
parent
7b07feb800
commit
9e4c22eadb
|
@ -1,5 +1,4 @@
|
|||
write "Enter n: "
|
||||
read n,!
|
||||
read "Enter n: ",n,!
|
||||
write n,"! = "
|
||||
do factorial(.n)
|
||||
write n,!
|
||||
|
|
|
@ -1,5 +1,4 @@
|
|||
write "Enter n: "
|
||||
read n,!
|
||||
read "Enter n: ",n,!
|
||||
set result=$$factorial(n)
|
||||
write n,"! = ",result,!
|
||||
halt
|
||||
|
|
|
@ -1,5 +1,4 @@
|
|||
write "Enter n: "
|
||||
read n,!
|
||||
read "Enter n: ",n,!
|
||||
set result=$$fibonacci(n)
|
||||
write "F(",n,") = ",result,!
|
||||
halt
|
||||
|
|
Loading…
Reference in New Issue