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

Узнай цену своей работы

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

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

Решение задачи: «Дано натуральное число n. Вычислить:»

textual
Листинг программы
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.

Оцени полезность:

5   голосов , оценка 3.8 из 5
Похожие ответы