progs/while-tests/and.while
author Christian Urban <christian.urban@kcl.ac.uk>
Fri, 26 Feb 2021 08:47:18 +0000
changeset 824 fb5462a350b1
permissions -rw-r--r--
updated while tests
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
824
fb5462a350b1 updated while tests
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
     1
n := 0;
fb5462a350b1 updated while tests
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
     2
if (n == 0) && (n == 1) then {
fb5462a350b1 updated while tests
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
     3
    write "yes"
fb5462a350b1 updated while tests
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
     4
} else {
fb5462a350b1 updated while tests
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
     5
    write "no"
fb5462a350b1 updated while tests
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
     6
}