![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
![]() Уважаемые форумчане-очень нужна ваша помощь в решении задачи по информатике(язык програмирования Delphi7).Задача состоит в следующем :найти минимальное число,которое представляется сумой 4 квадратов натуральных чисел не единственным образом!если несложно-покажите полный код программы.Заранее благодарен.
|
#2
|
|||
|
|||
![]() Полный код показать сложно, бо как готового нету.
Так что пробуем сами, выкладываем свои наработки и спрашиваем то, что не получается. Задача переборная, т.е. просто надо делать перебор всех вариантов. На первый взгляд - там 5 вложенных циклов: 4 для чисел и пятый для проверок. Когда вычисляешь результат, то его надо записывать в какой-нить массив, включая все исходные числа. Если такое число уже есть и исходные цифры, из которых оно образовалось, не совпадают - то вот твой ответ. Как построит циклы - подумай. |
#3
|
|||
|
|||
![]() Во.
Код:
Код немного страшный, зато работает. |
#4
|
||||
|
||||
![]() Какая тема будет следующей?
найти минимальное число,которое представляется сумой 8 квадратов натуральных чисел? Посмотрел ради интереса в гугле: полно теории, рефератов, примеров решения, теорем и т.д. ТС не удосужился даже в гугль зайти ![]() |
#5
|
|||
|
|||
![]() Да мне было просто интересно саму программу написать.
Задачка довольно интересная. Хотя, догадываюсь, что решение мягко говоря не оптимальное. |