Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 23.09.2012, 14:34   #1
kate63
 
Регистрация: 23.09.2012
Сообщений: 3
По умолчанию Нахождения всех трехзначных чисел

Извините пожалуйста, точно не знаю в какую тему поместить свою проблему... Подскажите, как составить алгоритм и программу нахождения всех трехзначных чисел, сумма кубов цифр которых больше 89.
kate63 вне форума Ответить с цитированием
Старый 23.09.2012, 21:45   #2
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,229
По умолчанию

самый простой способ = перебрать все варианты,
вот так, например:
Код:
for d1:=1 to 9 do
  for d2:=0 to 9 do
    for d3:=0 to 9 do
      if (d1*d1*d1 + d2*d2*d2 + d3*d3*d3 )>89 then
           WriteLn(d1,d2,d3);

всё.
p.s. решение явно неоптимальное...
Serge_Bliznykov вне форума Ответить с цитированием
Старый 24.09.2012, 14:32   #3
kate63
 
Регистрация: 23.09.2012
Сообщений: 3
По умолчанию

А если вот так?

for (i=1;x<10;i++)
for (j=0;j<10;j++)
for (k=0;k<10;k++)
if ( (pow(i,3) + pow(j,3) + pow(k,3)) > 89)
printf (i*100 + j*10 + k);
kate63 вне форума Ответить с цитированием
Старый 24.09.2012, 15:05   #4
Sciv
Старожил
 
Аватар для Sciv
 
Регистрация: 16.05.2012
Сообщений: 3,211
По умолчанию

kate63, у Вас в первой строчке опечатка: должно быть i<10. А так все вроде нормально
Начал решать проблему с помощью регулярных выражений. Теперь решаю две проблемы...
Sciv вне форума Ответить с цитированием
Старый 24.09.2012, 15:09   #5
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,229
По умолчанию

ага, Sciv чуток опередил, с замечанием полностью согласен.
за исключением омеченной ошибки-опечатки, имхо, вполне себе нормальный код с перебором всех вариантов...
Serge_Bliznykov вне форума Ответить с цитированием
Старый 24.09.2012, 16:45   #6
kate63
 
Регистрация: 23.09.2012
Сообщений: 3
По умолчанию

Спасибо!
kate63 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Вывод трехзначных чисел Dark Raven Помощь студентам 1 18.03.2012 11:44
Найти количество трехзначных чисел zenid Помощь студентам 3 29.02.2012 10:07
Pascal.Определить к-количество трехзначных натуральных чисел,сумма цифр которых n (n=13). naty7773 Помощь студентам 2 11.01.2012 16:43
программа нахождения всех чисел Армстронга, состоящих из трех цифр Татьана Помощь студентам 3 17.09.2011 14:23