Reel sayilari toplamak icin bir yerden sonrasini kesip atmak lazim.. Sonsuz toplam yapilamaz..
Asagida ilk 30 sayi ve ilk 30 asal sayinin toplami var.
Bitisik SayilarBitisik Asal SayilarToplam11.2.3.21.22.33.531.232.353.5841.2342.3573.59151.23452.35813.592661.234562.358233.5927971.2345672.3582473.59281481.23456782.35824893.592816791.234567892.358249133.59281702101.23456789102.35824916213.5928170531111.2345678910112.3582491625113.592817053522121.234567891011122.358249162515773.59281705352689131.23456789101112132.35824916251582893.5928170535269502141.2345678910111213142.3582491625158295773.592817053526950891151.234567891011121314152.358249162515829584833.59281705352695089898161.23456789101112131415162.35824916251582958491733.5928170535269508990689171.2345678910111213141516172.3582491625158295849182873.592817053526950899069904181.234567891011121314151617182.358249162515829584918298133.59281705352695089906991531191.23456789101112131415161718192.35824916251582958491829824793.5928170535269508990699154298201.2345678910111213141516171819202.3582491625158295849182982491573.592817053526950899069915431077211.234567891011121314151617181920212.358249162515829584918298249171473.59281705352695089906991543109168221.23456789101112131415161718192021222.35824916251582958491829824917162393.5928170535269508990699154310918361231.2345678910111213141516171819202122232.3582491625158295849182982491716255673.592817053526950899069915431091837790241.234567891011121314151617181920212223242.358249162515829584918298249171625584973.59281705352695089906991543109183780821251.23456789101112131415161718192021222324252.35824916251582958491829824917162558516093.5928170535269508990699154310918378084034261.2345678910111213141516171819202122232425262.3582491625158295849182982491716255851629013.592817053526950899069915431091837808405427271.234567891011121314151617181920212223242526272.358249162515829584918298249171625585162922273.59281705352695089906991543109183780840544854281.23456789101112131415161718192021222324252627282.35824916251582958491829824917162558516292249013.5928170535269508990699154310918378084054487629291.2345678910111213141516171819202122232425262728292.3582491625158295849182982491716255851629224925573.592817053526950899069915431091837808405448765386301.234567891011121314151617181920212223242526272829302.358249162515829584918298249171625585162922492582233.59281705352695089906991543109183780840544876541153
Mathematica kodu
TableForm[Table[digit1 = Flatten[IntegerDigits /@ Range[i]];
sayi = N[FromDigits[digit1 10^(-Length@digit1 + 1)], Length@digit1];
digit2 = Prime[Range@Length@digit1];
asal = N[FromDigits[digit2 10^(-Length@digit2 + 1)], Length@digit2];
{sayi, asal, sayi + asal}, {i, 30}],
TableHeadings -> {None, {"Bitisik Sayilar", "Bitisik Asal Sayilar",
"Toplam"}}]