// PascalABC.NET
begin
var x := ReadReal('x =');
var p := 1.0;
for var i := 1 to 32 do
p *= (x - 2 * i) / (x - 2 * i + 1);
Print(p)
end.
Объяснение:
Формула, дающая нужный результат:
Ввод целого х может приводить к получению нуля или бесконечности из-за попадания нуля в числитель или в знаменатель.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
// PascalABC.NET
begin
var x := ReadReal('x =');
var p := 1.0;
for var i := 1 to 32 do
p *= (x - 2 * i) / (x - 2 * i + 1);
Print(p)
end.
Объяснение:
Формула, дающая нужный результат:
Ввод целого х может приводить к получению нуля или бесконечности из-за попадания нуля в числитель или в знаменатель.