Это произведение
var p,i:integer;
begin
p:=1;
for i:=2 to 11 do
p;=p*i;
writeln (p);
end.
Это подсчёт i
var k,i:integer;
begin
k:=0;
for i:=2 to 11 do
k;=k+1i;
writeln (k);
end.
сумму не понятно чего?
Минимально 3. переставлять будем двоеточие, начиная со второго слева.
15х78=1170(символов) на 1 странице
530х1170=620100(символов)в документе
1 символ-1 байт
620100байт
620100:1024=605(кб) не поместиться