Data update

Task/Abstract-type/PascalABC.NET/abstract-type-1.pas

@@ -0,0 +1,20 @@
+type
+  MyAbstract = abstract class
+    public
+      procedure Proc1; abstract;
+      procedure Proc2;
+      begin
+      end;
+  end;
+  MyClass = class(MyAbstract)
+    public
+      procedure Proc1; override;
+      begin
+      end;
+  end;
+
+
+begin
+  var a := new MyClass;
+  a.Proc1;
+end.

Task/Abstract-type/PascalABC.NET/abstract-type-2.pas

@@ -0,0 +1,22 @@
+type
+  IMyInterface = interface
+    procedure Proc1;
+    procedure Proc2;
+  end;
+  MyClass = class(IMyInterface)
+    public
+      procedure Proc1;
+      begin
+        Print(1);
+      end;
+      procedure Proc2;
+      begin
+        Print(2);
+      end;
+  end;
+
+begin
+  var a: IMyInterface := new MyClass;
+  a.Proc1;
+  a.Proc2;
+end.