Құжаттағы тақырыптар тізімі қалай аталады?​

PYfy9pX4YibdfKzE8dnbSXaP3D5sbZenWQXx+TzottBxmrnKP4dS39zDFCHeytaxQuaxO6+SihcUhSqF6PmmxN3GxGIIAPLiSxjqjTtSHbvo7htEBwkC9DrKA9nK9xIOxPRcjpd6DAdMG0SkqPbK1+57wXgl2KsD43bDyI91iNHZGVEFuJjW2WjoZmDZOb/rVd7R9AqyWfNwqgLu5n0s8oZKpT55zvtPlOdDo6CM93h3C9G55Qj17fBXO/NNywpSzMGUqCxZha8Dm9QprL4Amawdo2pnCyu31Kn+Zny692acWR8k+IjeIoeL9HS7GGpxomAYoUcl2QOl2meKVWiovxtHmLKNooQK1Hc8yqvu293YHqgzQp3rHNgJxPJfiQnUmlYXGvOGZLk6vEUXIiesvdftDsCS/8Ae6YiLr8HWExGez9YXrworoX46BqS86+EFy3m8zwgu1fA9z61qLUP90KYw8KxlJJDWAThAVGrADHEsoHJ35+216/jwx5ruS3xgPOL83Vy5P1bL884jUiefVsuhprgR7C75lvy2ZCUYolQ=

Program task1;
var  a, i, kol :integer;
begin
  for i:= 1 to 3 do  begin    readln(a);    if a > 0 then      inc(kol);  end;  writeln(kol);
end.

program task2;
var  n, result :integer;
function summa (x :integer) :integer;  var     i, sum :integer;  begin    for i:= 1 to x do      sum:= sum + i;    summa:= sum;  end;
begin
  readln(n);  result:= summa(n);  writeln(result);
end.

program task3;
var  i, n, growth, sum, kol :integer;  SrGrowth :real;
begin
  readln(n);  sum:= 0; kol:= 0;  for i:= 1 to n do  begin    readln(growth);    sum:= sum + growth;    inc(kol);  end;  SrGrowth:= sum/kol;  writeln(SrGrowth);
end.

program task4;
var  l :integer;
begin
  readln(l);  l:= l div 100;  writeln(l);
end.