Паскаль. помогите пожалуйста. 40 баллов

Question

Паскаль. помогите пожалуйста. 40 баллов

---

Answer 1

Var
  n, cnt, sum, i, t: integer;
begin
  read(n);
  cnt := 0;
  sum := 0;
  for i := 1 to n do
  begin
    read(t);
    if t > 0 then
    begin
      inc(cnt);
      sum := sum + t;
    end;
  end;
  writeln(sum / cnt : 0 : 1);
  write(cnt);
end.

Comments

cnt это что?)))

---

и вот эта строчка как расшифровывается?) inc(cnt);

---

Это названия переменной, которая считает количество дней с температурой выше нуля

---

название*

---

а "inc(cnt);" что это такое, просто не проходили еще)

---

Это то же самое, что и cnt := cnt + 1, т.е. увеличение значения переменной на 1