Скачай шрифт с таким размером)
Тест:
n=4, a=2
i=1: p = 2/1+1 = 3
i=2: p = 3*(4/3+1) = 3*2.3333 = 6.9999
i=3: p = 6.9999*(8/6+1) = 16.3329
i=4: p = 16.3329*(16/10+1) = 42.4655
var n,i,s:integer; a,st,p:real;
begin
write('n = ');readln(n);
write('a = ');readln(a);
p:=1; s:=0; st:=1;
for i:=1 to n do
begin
st:=st*a;
s:=s+i;
p:=p*(st/s+1);
end;
writeln('П = ',p);
end.
Пример:
n = 4
a = 2
П = 42.4666666666667
1024*4=4096
1байт-8битов
1Кбайт-1024 байта
1Мбайт-1024 Кбайта
1Гбайт-1024 Мбайта
Так как $C$1 - абсолютная формула как по столбцу, так и по сточке, то при перемещении в любое направление она не изменится.