1program incltest (input, output); 2 3#include "incltypes.h" 4#include "included.h" 5 6var p : T; 7 q : OT; 8 r : RT; 9begin 10 new(r); 11 r^.i := 3; 12 r^.j := 4; 13 Blah; 14end. 15