Вниз
Скачать: CL | DM;

Объясните, пожалуйста, устное решение задачи №2   Найти похожие ветки 

 
Pdkle   (2007-09-17 19:14) [0]

Найдите сумму всех не делящихся на 5 натуральных чисел, не превосходящих 5000.
Заранее благодарен!


 
Kerk ©   (2007-09-17 19:16) [1]

Сумма арифметической прогрессии с шагом 1 до 5000 - сумма арифметической прогрессии с шагом 5 до 5000

Задолбал


 
partizan   (2007-09-17 19:17) [2]

1) Найти сумму всех нат. чисел, не превосходящих 5000.
2) Вычесть сумму делящихся на 5, как 5*(сумма всех нат. чисел не превосходящих 1000.)


 
БарЛог ©   (2007-09-17 19:18) [3]

не сразу вкурил: - - это МИНУС :)


 
Pdkle   (2007-09-17 19:22) [4]


>
> Сумма арифметической прогрессии с шагом 1 до 5000 - сумма
> арифметической прогрессии с шагом 5 до 5000

Это как?
Ну вот формула для суммы с шагом 1: n*(n+1)/2.
А для 5 что?


 
Kerk ©   (2007-09-17 19:32) [5]

> [4] Pdkle   (17.09.07 19:22)

Потерпи немного. Когда подрастешь, в 7м классе тебе расскажут.


 
Pdkle   (2007-09-17 19:37) [6]

да я школу лавно закончил


 
Pdkle   (2007-09-17 19:49) [7]


> Kerk


Ну так какая формула???? Подскажите, пожалуйста!


 
БарЛог ©   (2007-09-17 20:08) [8]

> да я школу лавно закончил
ой, зря ты это сказал :)


 
tesseract ©   (2007-09-17 22:40) [9]

sum:=0;
for i:=0 to 5000
begin
 /// почти оодиннадцать, остаток от деления вроде mod возвращает
  if (i mod 5)<>0 then
   sum:=sum+i;
end;


 
palva ©   (2007-09-17 22:42) [10]

tesseract ©   (17.09.07 22:40) [9]
Интересно, когда появятся оптимизаторы, которые заменят этот текст одним оператором присваивания.


 
partizan   (2007-09-17 23:45) [11]


> Ну так какая формула???? Подскажите, пожалуйста!


> 5*(сумма всех нат. чисел не превосходящих 1000.)



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.024 c
1-1185839798
Dr. Andrew
2007-07-31 03:56
2007.10.14
Как обрисовать выделенный регион штриховой (пунктирной) линией?


2-1190401413
яблочго
2007-09-21 23:03
2007.10.14
Как выяснить, design-time или run-time?


2-1189951828
Serega99
2007-09-16 18:10
2007.10.14
sleep( )


15-1189593227
de.
2007-09-12 14:33
2007.10.14
El-lib


1-1185769220
Егоров А.Н.
2007-07-30 08:20
2007.10.14
Панель задач для Delphi




   Наверх