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

Простенькая задачка   Найти похожие ветки 

 
Victor_t   (2006-03-28 17:21) [0]

Господа программисты! Помогите пожалуйста!!! Такая вот простая у меня задача, только вот сделать никак не могу! Помогите, кто может!!
Даётся n чисел, нужно узнать можно ли складывая эти числа получить число w? Сколькими способами?


 
Ega23 ©   (2006-03-28 17:24) [1]

Sum:=0;
for i:=1 no n do Sum:=Sum+Число[i];
if Sum=w then ShowMessage("Равно") else  ShowMessage("Не равно")


 
oldman ©   (2006-03-28 17:25) [2]

тоже про перебор не слышал...
и про рекурсию...


 
Бугага ©   (2006-03-28 18:34) [3]

[1] Ega23 ©   (28.03.06 17:24)

Совсем не то...


 
Jeer ©   (2006-03-28 18:36) [4]

Кто бы спорил:)


 
Бугага ©   (2006-03-28 18:43) [5]

Гы :) Просто в [1] смайла не увидел, поэтому и испужался :)


 
Ega23 ©   (2006-03-28 19:02) [6]


> Гы :) Просто в [1] смайла не увидел, поэтому и испужался
> :)


Просто в [0] некорректно поставлена задача. А в качестве частного случая - чем не вариант решения?  :о)
Вообще-то, конечно, рекурсия...



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

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



Память: 0.46 MB
Время: 0.025 c
4-1138786134
Cashmare
2006-02-01 12:28
2006.04.16
WaitForSingleObject & Synchronize


2-1143635931
Fl@sh
2006-03-29 16:38
2006.04.16
From TMemoryStream to PByte


4-1138029294
Anton B.
2006-01-23 18:14
2006.04.16
Глючит DDE


15-1143548588
Alexey V.
2006-03-28 16:23
2006.04.16
Запись действий ( как запись макросов Word/Excel)


4-1138463324
maxim161
2006-01-28 18:48
2006.04.16
Слежение за файловой системой




   Наверх