Add multilingual language and systems learning tracks

ceb/objectpascal-practice-20261101/README.md

@@ -0,0 +1,9 @@
+# Object Pascal & Objective-Pascal — paghimo ug pagsulay
+
+[Agila University track](https://edu.agilaos.com/track.php?track=10&lang=ceb)
+
+Mga 15 minutos matag leksyon. Tag-ana, padagana, usba, ipasabot, ug tubaga ang pagsusi sa University.
+
+- [Lesson 1: Collection ug balikbalik nga buluhaton](lesson-1/lesson.html)
+- [Lesson 2: Usa ka importante nga kinaiya sa pinulongan](lesson-2/lesson.html)
+- [Lesson 3: Paghimo, gub-a, ug sulayi ang study planner](lesson-3/lesson.html)

ceb/objectpascal-practice-20261101/lesson-1/lesson.html

@@ -0,0 +1,11 @@
+<!doctype html><html lang="ceb"><meta charset="utf-8"><title>Collection ug balikbalik nga buluhaton</title><h1>Collection ug balikbalik nga buluhaton</h1><p>15-minutong sesyon: pagbasa sulod sa 3 minutos, pag-trace sa 3, pag-eksperimento sa 7, ug pagtubag sa check sa 2. Paggahin og dugang oras kon gikinahanglan.</p><p>Ang collection nagtipig sa may kalabotang value. Bisitahon sa loop ang 1, 2, ug 3; ang total gikan sa 0 mahimong 1, 3, ug 6. Isulat ang trace imbes manag-an. Ilha ang una ug kataposang valid nga posisyon: mahimong 1-based ang Pascal array samtang zero-based ang daghang ubang container. Idugang og value ug taronga ang bounds. Ipasabot ang resulta alang sa empty collection.</p><p>Lahi ang Object Pascal classes ug Objective-Pascal. Unaha ang <code>class</code>, construction, ug <code>Free</code> sa Linux lab. Ang Objective-Pascal modugang og Objective-C interoperability pinaagi sa mode switches; wala sa lab ang maong Apple runtime.</p><pre><code class="language-objectpascal">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.
+</code></pre><p><strong>Gipaabot nga resulta:</strong> <code>6</code></p><h3>Praktis ug ebidensiya</h3><p>Isulat ang tagna, aktuwal nga resulta, ug hinungdan sa pagkapareho o kalainan. Ang completion check mosukod sa pagsabot; ang practice task mopauswag sa kahanas.</p><p><a href="https://docs.freepascal.org/daily/doc/ref/refse74.html">Reperensiya sa pinulongan</a></p></html>

ceb/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.

ceb/objectpascal-practice-20261101/lesson-2/lesson.html

@@ -0,0 +1,17 @@
+<!doctype html><html lang="ceb"><meta charset="utf-8"><title>Usa ka importante nga kinaiya sa pinulongan</title><h1>Usa ka importante nga kinaiya sa pinulongan</h1><p>15-minutong sesyon: pagbasa sulod sa 3 minutos, pag-trace sa 3, pag-eksperimento sa 7, ug pagtubag sa check sa 2. Paggahin og dugang oras kon gikinahanglan.</p><p>Gamita ang nota sa pinulongan sa ubos aron ipasabot ang pag-usab sa state. Ilha unsa ang gikopya, gipaambit, mahimong mapakyas, ug gibuhian. Dili tanan nga pangutana magamit niini nga programa: isulti kung hain. Paghimo og usa ka kausaban, tag-ana ang epekto, ug itandi sa aktuwal nga resulta. Mahimong lahi ang lagda sa pamilyar nga operator sa laing pinulongan.</p><p>Lahi ang Object Pascal classes ug Objective-Pascal. Unaha ang <code>class</code>, construction, ug <code>Free</code> sa Linux lab. Ang Objective-Pascal modugang og Objective-C interoperability pinaagi sa mode switches; wala sa lab ang maong Apple runtime.</p><pre><code class="language-objectpascal">program AgilaStudy;
+{$mode objfpc}{$H+}{$assertions on}
+
+type TPlan = class
+  public Done: Integer;
+end;
+var Plan: TPlan;
+begin
+  Plan := TPlan.Create;
+  try
+    Plan.Done := 3;
+    writeln(Plan.Done);
+  finally
+    Plan.Free;
+  end;
+end.
+</code></pre><p><strong>Gipaabot nga resulta:</strong> <code>3</code></p><h3>Praktis ug ebidensiya</h3><p>Isulat ang tagna, aktuwal nga resulta, ug hinungdan sa pagkapareho o kalainan. Ang completion check mosukod sa pagsabot; ang practice task mopauswag sa kahanas.</p><p><a href="https://docs.freepascal.org/daily/doc/ref/refse74.html">Reperensiya sa pinulongan</a></p></html>

ceb/objectpascal-practice-20261101/lesson-2/main.pas

@@ -0,0 +1,16 @@
+program AgilaStudy;
+{$mode objfpc}{$H+}{$assertions on}
+
+type TPlan = class
+  public Done: Integer;
+end;
+var Plan: TPlan;
+begin
+  Plan := TPlan.Create;
+  try
+    Plan.Done := 3;
+    writeln(Plan.Done);
+  finally
+    Plan.Free;
+  end;
+end.

ceb/objectpascal-practice-20261101/lesson-3/lesson.html

@@ -0,0 +1,15 @@
+<!doctype html><html lang="ceb"><meta charset="utf-8"><title>Paghimo, gub-a, ug sulayi ang study planner</title><h1>Paghimo, gub-a, ug sulayi ang study planner</h1><p>15-minutong sesyon: pagbasa sulod sa 3 minutos, pag-trace sa 3, pag-eksperimento sa 7, ug pagtubag sa check sa 2. Paggahin og dugang oras kon gikinahanglan.</p><p>Ang mapuslanong test motandi sa resulta ug requirement. Dili angay mahimong negative ang nahibiling trabaho sa nonnegative input domain sa planner. Padagana ang starter, tuyoang tangtanga ang proteksiyon kon labaw sa total ang completed, ug siguroa nga adunay check nga mapakyas. Ibalik kini. Idugang ang duha ka study task, summary, ug boundary cases. I-save ang source ug ebidensiya sa Agila Forge. Ipasabot ang matag linya, apil ang gisugyot sa AI.</p><p>Lahi ang Object Pascal classes ug Objective-Pascal. Unaha ang <code>class</code>, construction, ug <code>Free</code> sa Linux lab. Ang Objective-Pascal modugang og Objective-C interoperability pinaagi sa mode switches; wala sa lab ang maong Apple runtime.</p><pre><code class="language-objectpascal">program AgilaStudy;
+{$mode objfpc}{$H+}{$assertions on}
+function Remaining(Total, Done: Integer): Integer;
+begin
+  if Done &gt;= Total then Result := 0 else Result := Total - Done;
+end;
+
+begin
+  Assert(Remaining(4,1)=3);
+  Assert(Remaining(4,4)=0);
+  Assert(Remaining(4,5)=0);
+  Assert(Remaining(0,0)=0);
+  writeln(&#x27;Nipasar&#x27;);
+end.
+</code></pre><p><strong>Gipaabot nga resulta:</strong> <code>Nipasar</code></p><h3>Praktis ug ebidensiya</h3><p>Isulat ang tagna, aktuwal nga resulta, ug hinungdan sa pagkapareho o kalainan. Ang completion check mosukod sa pagsabot; ang practice task mopauswag sa kahanas.</p><p><a href="https://docs.freepascal.org/daily/doc/ref/refse74.html">Reperensiya sa pinulongan</a></p></html>

ceb/objectpascal-practice-20261101/lesson-3/main.pas

@@ -0,0 +1,14 @@
+program AgilaStudy;
+{$mode objfpc}{$H+}{$assertions on}
+function Remaining(Total, Done: Integer): Integer;
+begin
+  if Done >= Total then Result := 0 else Result := Total - Done;
+end;
+
+begin
+  Assert(Remaining(4,1)=3);
+  Assert(Remaining(4,4)=0);
+  Assert(Remaining(4,5)=0);
+  Assert(Remaining(0,0)=0);
+  writeln('Nipasar');
+end.