Предмет: Информатика, автор: dalernasimjon04

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

Приложения:

Ответы

Автор ответа: kovalhcukivana
0

Ответ:

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.

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

Интересные вопросы
Предмет: Українська мова, автор: malozomovdan
Предмет: Математика, автор: Anya6663