Add multilingual language and systems learning tracks

en/objectpascal-practice-20261101/lesson-1/main.pas

@@ -0,0 +1,10 @@
+program AgilaStudy;
+{$mode objfpc}{$H+}{$assertions on}
+
+var Minutes: array[1..3] of Integer; I, Total: Integer;
+begin
+  Minutes[1] := 1; Minutes[2] := 2; Minutes[3] := 3;
+  Total := 0;
+  for I := Low(Minutes) to High(Minutes) do Total := Total + Minutes[I];
+  writeln(Total);
+end.