Частично и часто...спасибо за внимание.
Снеговик: Всем привет)
Баба Яга: Привет, я не хочу с тобой разговаривать!!!
Снеговик: почему?
Баба Яга: ты меня обидел!!!
Снегурочка: перестаньте ругаться!!!!!!!
Дед Мороз: снегурочка права не стоит ругатся из за каких то мелочей!!!
А) (п ^ в ^ с)-><span>ж
б)(т(отр.) v д(отр.)^ л)-></span><span>л(отр)
-> если что, это стрелка
</span>
<h3>// PascalABC.NET 3.4.2, сборка 1814 от 02.10.2018</h3><h3>// Внимание! Если программа не работает, обновите версию!</h3>
begin
var x := ReadReal('x=');
var n := ReadInteger('n=');
var (k, p, q, s) := (x * x, 1.0, 1.0, 0.0);
for var i := 1 to n do
begin
p *= k;
q *= 2 * i * (2 * i - 1);
s += p / q
end;
Println('Сумма =', s)
end.