Something
public text v1 · immutable2. Ką atspausdins i programa:
var p, q : ^integer;
begin
new (p); new (q); q^ := 3; p^ := q^;
if p = q then p := nil else if p^ = q^ then q := p;
if p = q then q^ := 5;
writeln (p^)
end.
2. Ką atspausdins i programa:
var p, q : ^integer;
begin
new (p); new (q); q^ := 3; p^ := q^;
if p = q then p := nil else if p^ = q^ then q := p;
if p = q then q^ := 5;
writeln (p^)
end.