1)сосчитать чему ровно=S. 2)найти произведение от 2 до 11. 3)сосчитать i

Это произведениеvar p,i:integer;beginp:=1;for i:=2 to 11 dop;=p*i;writeln (p);end.Это подсчёт ivar k,i:integer;begink:=0;for i:=2 to 11 dok;=k+1i;writeln (k);end.сумму не понятно чего?