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

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

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

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

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.800 из 5


СОХРАНИТЬ ССЫЛКУ