langs a-z
This commit is contained in:
parent
db842d013d
commit
d066446780
11389 changed files with 98361 additions and 1020 deletions
5
Task/Loops-While/Standard-ML/loops-while-1.ml
Normal file
5
Task/Loops-While/Standard-ML/loops-while-1.ml
Normal file
|
|
@ -0,0 +1,5 @@
|
|||
val n = ref 1024;
|
||||
while !n > 0 do (
|
||||
print (Int.toString (!n) ^ "\n");
|
||||
n := !n div 2
|
||||
)
|
||||
Loading…
Add table
Add a link
Reference in a new issue