FO
Size: a a a
FO
t
c
t
g
g
t
t
t
t
g
g
A
g
t
t
t
КП
(int sum := 0; for i to n do sum +:= f(i) od; sum)
t
node n := "1234";
# or n := EMPTY; #
case n in
(void): print(("void:", "EMPTY")),
(real r): print(("real:", r)),
(int i): print(("int:", i)),
(compl c): print(("compl:", c)),
(string s): print(("string:", s))
out print(("?:", n))
esac
t