Mükemmel Sayıyı Bulana Bir Milyon Dolar

[kompLeks]

flzf";p=&quot´isimli üyeden Alıntı

sayılar sayılar amatör matematikçilerin göz bebeği bu arada fermetın son teoremiyle ilgilenenler bakın ne göstericem

1782^12+1841^12=1922^12

10083952674576^3+11487225696961^3=13646256599056^3

* *bu sayıları kafadan mı salladın ya tutarsa die.....
hiç güleceğim yoktu gerçekten ya....

* * * * * * * * *

[kompLeks]

sargon";p=&quot´isimli üyeden Alıntı

Sevgili kompleks,

Eğer Collatz problemini çözdüysen yapman gereken sanırım şu. Önce şu Clay Matematik Enstitüsünün sitesine iyice bir gözat.

http://www.claymath.org/millennium/

Ama direk bir mail yazıp parayı alamıyorsun maalesef. Bu iş o kadar kolay değil. Önce çözümünü ispatlaman gerek. Bunun için de *çözümünü uluslararası hakemli bir dergide yayınlaman gerekiyor.

Bu arada, merak ediyorum. 1'e ulaşamayan bir rakam bulmayı mı başardın yoksa bu işlemler dizisinin her zaman 1'e ulaştığını ispat eden bir teorem mi geliştirdin?

her zaman 1 olacağını ispatladım bunu sözlü olarak çok rahat ifade edebilirim ama bilimsel bir dergide makale olarak yayınlanması için ilk önce ingilizce bilmem gerekiyor ve makaleyi ingilizce hazırlamam gerekiyor...bu da bayağı bi zamanımı alır...zaten tek tek deniyerek ancak 1 olmayacağını ispatlayabilirsin...ki bu da sonsuza kadar sürebilir...o yüzden işe her zaman 1 olabileleceğini düşünerek başlamak daha mantıklı...o zaman çözümü de görüyorsun zaten...

[kompLeks]

bu arada sevgili sargon,

* şu elindeki programa(sayıları test eden program) ulaşabileceğim bir site var mı...ya da programı sen yazıyorsan bana yazılım hakkında biraz bilgi verebilir misin?

benim bildiğim en mükemmel sayı doların üzeindeki 100 rakamı, bundan daha
mükemmelini tanımıyorum *

[kompLeks]

gandalf";p=&quot´isimli üyeden Alıntı

benim bildiğim en mükemmel sayı doların üzeindeki 100 rakamı, bundan daha
mükemmelini tanımıyorum *

* *

* * ben daha mükemmelini tanıyorum euro nun üzerindeki 1oo rakamı *

[flzf]

kompLeks";p=&quot´isimli üyeden Alıntı

* *bu sayıları kafadan mı salladın ya tutarsa die.....
hiç güleceğim yoktu gerçekten ya....

* * * * * * * * *

neden güldünüzki fermatın son teoremini bilirmisiniz ve sayıları denedinizmi

[kompLeks]

flzf";p=&quot´isimli üyeden Alıntı

neden güldünüzki fermatın son teoremini bilirmisiniz ve sayıları denedinizmi

*bi teorem vardır

a^n+b^n=c^n ; a,b,c,nЄŜ(sayma sayıları) ; n>2 için sayma sayılarında çözüm olmadığı ispatlandı zaten...o yüzden yazdığın eşitlik doğru olamaz...doğru olsa teorem çürümüş olur...

* kaldı ki senin verdiğin eşitliğin doğru olmadığını anlamak için ne bu ispata *gerek var ne de tek tek hesaplamaya...biraz dikkatli bakan herkes onların eşit olmadığını görür zaten *

[flzf]

sayıları bi denesene şaşıracaksın sadece çift tek toplamı tek etmesi gerek ama hesapmakinleri eşit çıkartıyo

[kompLeks]

flzf";p=&quot´isimli üyeden Alıntı

sayıları bi denesene şaşıracaksın sadece çift tek toplamı tek etmesi gerek ama hesapmakinleri eşit çıkartıyo

doğrudur ama hesap makineleri 39 basamaklı bi şeyi hesaplayamaz bu yüzden ilk 12 basamakları eşit çıktığı için eşittir diyor geriye kalan 27 basamağı yutuyor...

[sargon]

C# ve .NET 2.0 kullandım. Üstünkörü birşey ama idare et artık.

using System;
using System.Collections.Generic;
using System.Text;

namespace ConsoleApplication1
{
class Program
{
static void Main(string[] args)
{
Int64 i = 1;
Int64 result = 1;
Int64 iBasamak = 0;
while (true)
{
i++;
result = i;
iBasamak = 0;
Console.Write("Hesaplanan Sayi=" + i + " *:");
while (result != 1)
{
if (bEvenNumber(result))
{
result = CalculateForEvenNumber(result);
}
else
{
result = CalculateForOddNumber(result);
}
iBasamak++;
//if (result != 1) {
// *Console.Write(result + ", ");
//}
if (result == 1) {
Console.WriteLine(iBasamak);
Console.WriteLine("--------------");
}
}
}
}
static Boolean bEvenNumber(Int64 iNumber)
{
Int64 result;
Math.DivRem(iNumber, 2, out result);
if (result == 0) { return true; }
else { return false; }
}

static Int64 CalculateForEvenNumber(Int64 iNumber)
{
return iNumber / 2;
}
static Int64 CalculateForOddNumber(Int64 iNumber)
{
return iNumber * 3 + 1;
}

}
}