Паскаль S=1 + (2/2) + (2+4/24) + (2+2+6/246) + ... + (2+4+6+2N/2462N) циклический алгоритм

Question

Информатика

Варсоноф

6 июня, 03:16

Паскаль S=1 + (2/2) + (2+4/24) + (2+2+6/246) + ... + (2+4+6+2N/2462N) циклический алгоритм

+3

Ответы (1)

Знаете ответ на вопрос?

Фессалоникия · Answer 1

Var

S, S0, P:real;

N:integer;

Begin

Write ('N = ') ;

ReadLn (N) ;

S:=1;

S0:=0;

P:=1;

For N: = 1 to N do

Begin

S0:=S0+2*N;

P:=P*2*N;

S:=S+S0/P

End;

WriteLn ('S = ', S) ;

End.

Паскаль S=1 + (2/2) + (2+4/2*4) + (2+2+6/2*4*6) + ... + (2+4+6+2N/2*4*6*2N) циклический алгоритм

Паскаль S=1 + (2/2) + (2+4/24) + (2+2+6/246) + ... + (2+4+6+2N/2462N) циклический алгоритм