Помогите пожалуйста!!Буду очень сильно благодарен!!
На языке PascalABC.Net или TurboPascal:
1) Разработать программу циклической структурой,используя цикл с параметром.
Дано действительное число х, натуральное число n. Написать программу, которая вычисляет сумму последовательности, заданной формулы x^1/1!+x^2/2!+x^3/3!+...+x^n/n!
На языке PascalABC.Net или TurboPascal:
1) Разработать программу циклической структурой,используя цикл с параметром.
Дано действительное число х, натуральное число n. Написать программу, которая вычисляет сумму последовательности, заданной формулы x^1/1!+x^2/2!+x^3/3!+...+x^n/n!
More Questions From This User See All
Answers & Comments
Verified answer
//PascalABC.NET 3.1 сборка 1239begin
var x := ReadReal('x =');
var s := 0.0;
var a := 1.0;
for var i := 1 to ReadInteger('n =') do
begin
a *= x / i;
s += a;
end;
writeln(s);
end.