Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Object Pascal: кроссплатформенные технологии > Программа на Паскале, попмогите составить

Автор: w4w 12.8.2008, 16:30

Найти сумму 10 членов арифметической прогрессии:
А, А+D, A+2D, ..где А - первый член прогрессии, D - постоянное слагаемое, разность прогрессии...

вот формула http://www.math.ru/dic/16

Автор: volvo877 12.8.2008, 17:00

Поможем, только сначала ты:
1) исправь название темы, в соответствии с http://forum.vingrad.ru/act-boardrules.html (см. правило №1)
2) покажи, что делал(а) самостоятельно, поскольку помощь это совсем не решение за тебя полностью (разница ясна, я надеюсь?)

Автор: Chazer 16.8.2008, 14:18

Код


var a,d,s:integer;
begin
readln(a,d);
s:=(2*a+9*d)*5;
writeln(s);
end.

Использовалась формула $user posted image$ , которая была упрощенная под конкретный случай.

w4w, в следующий раз с подобными запросами обращайся в Центр помощи.