reading symbolic information ...
type Rec = record
charValue : char;
intValue : integer;
subrange : 0..1000;
realValue : real;
end;
var r : Rec;
execution completed
(charValue = 'c', intValue = 3, subrange = 10, realValue = 3.4)
3.4 10 3 'c'