progs/while-tests/andor.while
author Christian Urban <christian.urban@kcl.ac.uk>
Tue, 19 Sep 2023 09:54:41 +0100
changeset 920 7af2eea19646
parent 824 284ac979f289
permissions -rw-r--r--
updated
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
824
284ac979f289 updated while tests
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
     1
n := 0;
284ac979f289 updated while tests
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
     2
if ((n == 0) || (n == 1)) && ((n == 2) || (n <= 0)) then {
284ac979f289 updated while tests
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
     3
    write "yes"
284ac979f289 updated while tests
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
     4
} else {
284ac979f289 updated while tests
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
     5
    write "no"
284ac979f289 updated while tests
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
     6
}