Дано натуральное число n вычислить 12+234 + ... + n (n+1) * ... * 2n (паскаль, цикл)

Question

Информатика

Мастридия

15 января, 21:24

Дано натуральное число n вычислить 12+234 + ... + n (n+1) * ... * 2n (паскаль, цикл)

+5

Ответы (1)

Знаете ответ?

Аврея · Answer 1

Var

s, p: longint;

i, j, n: integer;

begin

Write ('Введите n: ') ; Readln (n) ;

s : = 0;

for i : = 1 to n do

begin

p : = 1;

for j : = i to 2 * i do p : = p * j;

s : = s + p

end;

Writeln ('Сумма равна ', s)

end.

Тестовое решение:

Введите n: 5

Сумма равна 158306

Дано натуральное число n вычислить 1*2+2*3*4 + ... + n * (n+1) * ... * 2n (паскаль, цикл)

Дано натуральное число n вычислить 12+234 + ... + n (n+1) * ... * 2n (паскаль, цикл)