RosettaCodeData/Task/Include-a-file/ALGOL-68/include-a-file-5.alg

10 lines
224 B
Text
Raw Permalink Normal View History

2013-10-27 22:24:23 +00:00
BEGIN
INT dim = 3; # a constant #
INT a number := 120; # a variable #
ENVIRON EXAMPLE1;
MODE MATRIX = [dim, dim]REAL; # a type definition #
MATRIX m1;
a number := ENVIRON EXAMPLE2;
print((a number))
END