ВУЗ: Не указан

Категория: Не указан

Дисциплина: Не указана

Добавлен: 10.07.2024

Просмотров: 29

Скачиваний: 0

ВНИМАНИЕ! Если данный файл нарушает Ваши авторские права, то обязательно сообщите нам.

Примеры решения задач

ak

 

 

 

(-1)k

 

 

(-1)k

 

(k -1)!

 

(-1)k -1 × (-1)

 

(k -1)!

 

-1

=

 

 

k !

=

×

=

×

=

ak −1

 

(-1)k -1

 

k !

(-1)k -1

 

(k -1)!× k

(-1)k -1

 

k

 

 

 

 

 

 

 

 

 

 

 

(k -1)!

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

ak =

 

-1

×ak−1

 

 

 

 

 

 

 

 

 

 

k

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

a1 =

( 1)1

= - 1

a2

=

(1)

× a1 =

 

1

 

 

an-1 =

(1)

 

× an-2 =...

 

 

n -1

2

2

 

 

1 !

 

 

 

 

 

 

 

 

 

 

 

 

 

а= -1/i*a.


Примеры решения задач

Примеры решения задач

Program TASK3 (input, output);

Uses CRT;

Var a,s: real; i, n: integer;

Begin

Clrscr: Writeln(’Программа расчета суммы’);

Writeln(Укажите необходимое число слагаемых’);

Write(’n = ’); read(n); a:= -1; S:= a;

For i:=2 to n do begin a:=(-1)/i*a; S:= S+a; end;

Writeln(’Сумма равна, S = ’,S:6:4);

Repeat Until Keypressed; End.