progs/while-tests/andor.while
author Christian Urban <christian.urban@kcl.ac.uk>
Fri, 03 Oct 2025 10:10:33 +0100
changeset 997 a4212e8bdcad
parent 824 fb5462a350b1
permissions -rw-r--r--
updated
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)) && ((n == 2) || (n <= 0)) 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
}