Mode:
Duration:
1
2
3
4
5
6
7
8
9
10
11
12
13
# modula2/if_example.m2
MODULE EvenOdd;
IMPORT InOut;
VAR n: INTEGER;
BEGIN
n := 7;
IF n MOD 2 = 0 THEN
InOut.WriteString("Even");
ELSE
InOut.WriteString("Odd");
END;
InOut.WriteLn;
END EvenOdd.Coding works best on desktop or with an external keyboard.