Помощь - Поиск - Пользователи - Календарь
Полная версия: сумма рядов
Форум «Всё о Паскале» > Современный Паскаль и другие языки > Делфи
BananaMan
такая задача

вычислить сумму рядов:
1*(1+2)*(1+2+3)*(1+2+3+4)*...
Найти сумму, а потом произведение.

пожалуйста помогите решить задачу
надо очень срочно
volvo
В чем проблема?
function s_of(n: integer): integer;
var i, s: integer;
begin
s := 0;
for i := 1 to n do inc(s, i);
result := s
end;

var
i, p: integer;
begin

p := 1;
for i := 1 to 4 do
p := p * s_of(i);

{ Вывод результата }

end.
Heroine
Спасибоооо большоеее!!!! yahoo!.gif
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.