Question

Написать на языке Pascal.​

Answer 1

Ответ:

1.program For22;

2.var

3. X,Rez,factorial,pow:Real;

4. N, i :Integer;

5. begin

6. Write('Введите X: ');

7. Readln(X);

8. Write('Введите N: ');

9. Readln(N);

10. Rez:=1;

11. pow:=1;

12. factorial:=1;

13. For i:=1 to N do

14. begin

15. factorial:=factorial*i;

16. pow:=pow*X;

17. Rez:=Rez+pow/factorial;

18. end;

19. Writeln(Rez);

20. end.

надеюсь что помогла .