| author | Christian Urban <christian.urban@kcl.ac.uk> |
| Fri, 30 Sep 2022 06:03:46 +0100 | |
| changeset 879 | f712b16df8a2 |
| parent 869 | 16247acc4b0e |
| permissions | -rw-r--r-- |
| 864 | 1 |
val Max : Int = 10; |
2 |
||
3 |
def sqr(x: Int) : Int = x * x; |
|
4 |
||
5 |
def all(n: Int) : Void = {
|
|
6 |
if n <= Max |
|
7 |
then { print_int(sqr(n)) ; new_line(); all(n + 1) }
|
|
8 |
else skip() |
|
9 |
}; |
|
10 |
||
|
869
16247acc4b0e
changed os-lib as a replacement for ammonite-ops
Christian Urban <christian.urban@kcl.ac.uk>
parents:
864
diff
changeset
|
11 |
{
|
|
16247acc4b0e
changed os-lib as a replacement for ammonite-ops
Christian Urban <christian.urban@kcl.ac.uk>
parents:
864
diff
changeset
|
12 |
print_string("Squares");
|
|
16247acc4b0e
changed os-lib as a replacement for ammonite-ops
Christian Urban <christian.urban@kcl.ac.uk>
parents:
864
diff
changeset
|
13 |
new_line(); |
|
16247acc4b0e
changed os-lib as a replacement for ammonite-ops
Christian Urban <christian.urban@kcl.ac.uk>
parents:
864
diff
changeset
|
14 |
all(0) |
|
16247acc4b0e
changed os-lib as a replacement for ammonite-ops
Christian Urban <christian.urban@kcl.ac.uk>
parents:
864
diff
changeset
|
15 |
} |