15-minutong sesyon: magbasa nang 3 minuto, mag-trace nang 3, mag-eksperimento nang 7, at sagutan ang check nang 2. Maglaan ng dagdag na oras kung kailangan.
Nag-iimbak ng magkakaugnay na value ang collection. Binibisita ng loop ang 1, 2, at 3; mula 0 ay nagiging 1, 3, at 6 ang total. Itala ang trace sa halip na manghula. Tukuyin ang una at huling valid na posisyon: maaaring 1-based ang Pascal array samantalang zero-based ang maraming ibang container. Magdagdag ng value at itama ang bounds. Ipaliwanag ang resulta para sa empty collection.
Nakapaloob sa begin at end ang mga statement. Assignment ang :=; comparison ang =. end. ang pagtatapos ng programa. Free Pascal sa Object Pascal mode ang gamit, mula sa procedural constructs.
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.
Inaasahang resulta: 6
Itala ang hula, aktuwal na resulta, at dahilan ng pagtugma o pagkakaiba. Sinusukat ng completion check ang pag-unawa; hinahasa ng practice task ang kasanayan.