• Добро пожаловать на компьютерный форум Tehnari.ru. Здесь разбираемся с проблемами ПК и ноутбуков: Windows, драйверы, «железо», сборка и апгрейд, софт и безопасность. Форум работает много лет, сейчас он переехал на новый движок, но старые темы и аккаунты мы постарались сохранить максимально аккуратно.

    Форум не связан с магазинами и сервисами – мы ничего не продаём и не даём «рекламу под видом совета». Отвечают обычные участники и модераторы, которые следят за порядком и качеством подсказок.

    Если вы у нас впервые, загляните на страницу о форуме и правила – там коротко описано, как задать вопрос так, чтобы быстро получить ответ. Чтобы создавать темы и писать сообщения, сначала зарегистрируйтесь, а затем войдите под своим логином.

    Не знаете, с чего начать? Создайте тему с описанием проблемы – подскажем и при необходимости перенесём её в подходящий раздел.
    Задать вопрос Новые сообщения Как правильно спросить
    Если пришли по старой ссылке со старого Tehnari.ru – вы на нужном месте, просто продолжайте обсуждение.

Решить уравнение в натуральных числах

  • Автор темы Автор темы iks2
  • Дата начала Дата начала

iks2

Новые
Регистрация
22 Окт 2016
Сообщения
62
Реакции
0
Баллы
0
Решить уравнение в натуральных числах

Решить уравнение [x^n] + [y^n] = [z^n] при n = 2,7
в натуральных числа на отрезке [1; 1000]
программа нашла три решения. Что интересно, чем меньше n, тем больше решений выдает программа. Ну как тут не поверить в истинность теоремы Ферма.

Код:
REM
REM  [x^n] + [y^n] = [z^n]
REM
REM  (25, 47, 50)
REM  (41, 41, 53)
REM  (478, 834, 988)
REM

CLS
DEFDBL A-Z

n = 2.7
m = 1 / n

FOR z = 2 TO 1000
   zn = INT(z ^ n)
   FOR y = 1 TO z - 1
      yn = INT(y ^ n)
      x = INT((zn - yn) ^ m) + 1
      IF x > y THEN 100
      IF INT(x ^ n) + yn = zn THEN PRINT x; y; z
100
NEXT y, z
END
 
Назад
Сверху