type complex = record re, im: real end;
item = record name: alfa;
age: integer;
location: complex;
displayed: boolean;
color: array[(red,green,blue)] of integer;
link: ^item;
cost: real end;
var items = array [ 8..12, (low, med, hi), 7..11] of item;
items[10, hi, 8].link^.color[blue]Show how it was derived and give the aref form.
n := k*2;
if n < j then write('less')
else begin k := k - 1; write('more') end;
writeln(k);
Number the blocks and draw a flow graph; give the matrix form of the
flow graph and its transitive closure.