Data update

Task/Pointers-and-references/PascalABC.NET/pointers-and-references.pas

@@ -0,0 +1,29 @@
+type MyClass = class
+public
+  x: integer := 555;
+end;
+
+begin
+  var pi: ^integer;
+  New(pi);
+  pi^ := 1023;
+  var pb: ^byte;
+  //pb := pi; // compiler error
+  var p: pointer;
+  p := pi;
+  pb := p;
+  Print(pb^); // byte representation of integer
+  loop 3 do
+  begin
+    pb := pointer(integer(pb)+1); // analog of pb++
+    Print(pb^);
+  end;
+  Println;
+  var obj := new MyClass; // obj is a reference to object
+  // All regferences in .NET are under control of garbage collection
+  Println(obj);
+  var obj1 := obj; // another reference to the same object
+  obj1.x := 666;
+  Println(obj);
+  obj := nil; // zero reference
+end.