1 2 3 4 5 6 7 8 9 10 11 12 13
Program XXX; (* *) (* See ../README.md *) (* *) (* *) (* Run as: fpc -och-1.out ch-1.p; ./ch-1.out *) (* *) begin writeln ('4, 6, 9, 10, 14, 15, 21, 22, 25, 26, 33, 34, 35, 38, 39, 46, 49, 51, 55, 57, 58, 62, 65, 69, 74, 77, 82, 85, 86, 87, 91, 93, 94, 95') end.