Дано натуральное число n. Вычислить: - Turbo Pascal (33687)

Формулировка задачи:

Дано натуральное число n. Вычислить: 1*2 + 2*3 + ... + n*(n + 1)* ... *2n ... Использовать цикл с параметром Огромная просьба - сделайте программу и блок-схему алгоритма. P.S Если не понятно задание в таком виде, то вот картинка с заданием:


textual

Код к задаче: «Дано натуральное число n. Вычислить: - Turbo Pascal (33687)»

var
   s,i,n :integer;
begin
write('ââåäèòå ÷èñëî n :');
readln(n);
s:=0;
for i:=1 to 2*n do s:=s+i*(i+1);
writeln('s= ',s);
end.
Эта работа вам не подошла?

Вы всегда можете заказать любую учебную работу у наших авторов от 20 руб.


СДЕЛАЙТЕ РЕПОСТ

5   голосов, оценка 3.800 из 5

Источник