Клавишу Shift - если я не ошибаюсь
Пусть пару имеют 2n камней, тогда без пары тоже 2n камней. Каждая пара и каждый непарный камень занимают один столбец, поэтому всего будет занято n + 2n = 3n столбцов.
Всего доступно столбцов 110/2 = 55, поэтому 3n ≤ 55, n ≤ 18.
Максимальному n = 18 соответствует максимальное количество камней 4n = 72.
А1:=1/х
а2:=а1/х=1/х/х=1
а3:=а2/х=1/х
а4:=а3/х=1/х/х=1
у:=а1 +а2=1/х+а1/х=1/х+(1/х)/х=1/х+1
у:=у+а3=1/х+1/х=2/х
у:=у +а4=2/х+1
Var n,i:integer;
p:real;
begin
write('n = ');
readln(n);
p:=1;
for i:=1 to n do p:=p*(1+1/(i*i));
writeln('p = ',p);
end.
Пример:
n = 5
p = 3.06944444444444