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.
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.
Ang begin ug end moputos sa mga statement. Assignment ang :=; comparison ang =. Ang programa matapos sa end.. Free Pascal sa Object Pascal mode ang gigamit, sugod 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.
Gipaabot nga resulta: 6
Isulat ang tagna, aktuwal nga resulta, ug hinungdan sa pagkapareho o kalainan. Ang completion check mosukod sa pagsabot; ang practice task mopauswag sa kahanas.