S.a arkadaslar soyle bı sorum olacak..
Programımda bazı matematıksel fonksıyonlar kullanarak ıslem yapıyorum ancak kullandıgım sayılar bıraz buyuk sayılar..
mesela power(25,105) .. power(34,74) gıbı.. bu ıslemlerın sonuclarını extended gıbı bı degıskene attıgımda hatalı sonuc cıkıyor bunun gıbı bı cok degısken tıpını denedım sızce nasıl yapmalıyım??
Tamsayı Değişken Tipleri??
Forum kuralları
Forum kurallarını okuyup, uyunuz!
Forum kurallarını okuyup, uyunuz!
kendi özel sayı tipini yanımla... ancak ben bunu küçük sayılar için kullanmıştım.
extended 10 byte yanlış hatırlamıyorsam.
system kaynak kodlarına bakarsan sayılarında özel türetilmiş tipler olduğunu görürsün.
aklıma gelen,
benim sayitipim: 1..zzzzzzzzzzzzzzzzzzzzzzzzzzz;
senin örneğinde bu alıp başına gidecek. ancak bu tipi matematiksel fonksiyonlarla kullanman içip epey kasman gerekir.
aklıma gelmişken 13-14 yil kadar önce csungurayın yazdığı bir kod vardı. 60 basamaklı sayıları standart kodlarla çarpan ve sonucunu bulan bir kod
eğer gönderebilirse (tabii bulabilrse) bundan yararlanıp kendi power işlevlerini vs yazabilirsin
extended 10 byte yanlış hatırlamıyorsam.
system kaynak kodlarına bakarsan sayılarında özel türetilmiş tipler olduğunu görürsün.
aklıma gelen,
benim sayitipim: 1..zzzzzzzzzzzzzzzzzzzzzzzzzzz;
senin örneğinde bu alıp başına gidecek. ancak bu tipi matematiksel fonksiyonlarla kullanman içip epey kasman gerekir.
aklıma gelmişken 13-14 yil kadar önce csungurayın yazdığı bir kod vardı. 60 basamaklı sayıları standart kodlarla çarpan ve sonucunu bulan bir kod
eğer gönderebilirse (tabii bulabilrse) bundan yararlanıp kendi power işlevlerini vs yazabilirsin
Kişi odur ki, koyar dünyada bir eser. Eseri olmayanın yerinde yeller eser./Muhammed Hadimi
http://www.ibrahimkutluay.net
http://www.ibrahimkutluay.net/blog
http://www.ibrahimkutluay.net
http://www.ibrahimkutluay.net/blog
Mesela sayın
Var
a: String;
begin
a := '12345678901234567890123456789012345678901234567890'
+ '12345678901234567890123456789012345678901234567890'
+ '12345678901234567890123456789012345678901234567890'
+ '12345678901234567890123456789012345678901234567890'
+ '12345678901234567890123456789012345678901234567890'
+ '12345678901234567890123456789012345678901234567890'
+ '12345678901234567890123456789012345678901234567890'
+ '12345678901234567890123456789012345678901234567890';
gibi ve dilediğin kadar da uzayabilir diyelim. Denemediğim ama köylü usulü diyerek önerdiğim şey öyle bir formülizasyon yapmalı ki, bu karakterleri blok blok alıp işlem yapıp yeniden karaktere dönüştürmek idi. Mesela bu rakamları 10 ile çarpmak istersen en sondaki satırdakinden son kısma '0' eklemek gibisinden. Tabi bu yapılabilir mi bilmiyorum. Sadece fikir jimlastiği.
Var
a: String;
begin
a := '12345678901234567890123456789012345678901234567890'
+ '12345678901234567890123456789012345678901234567890'
+ '12345678901234567890123456789012345678901234567890'
+ '12345678901234567890123456789012345678901234567890'
+ '12345678901234567890123456789012345678901234567890'
+ '12345678901234567890123456789012345678901234567890'
+ '12345678901234567890123456789012345678901234567890'
+ '12345678901234567890123456789012345678901234567890';
gibi ve dilediğin kadar da uzayabilir diyelim. Denemediğim ama köylü usulü diyerek önerdiğim şey öyle bir formülizasyon yapmalı ki, bu karakterleri blok blok alıp işlem yapıp yeniden karaktere dönüştürmek idi. Mesela bu rakamları 10 ile çarpmak istersen en sondaki satırdakinden son kısma '0' eklemek gibisinden. Tabi bu yapılabilir mi bilmiyorum. Sadece fikir jimlastiği.
http://www.delphiforfun.org/programs/Li ... tegers.htm
önce demoyu indirip bi bakın.
önce demoyu indirip bi bakın.
Nice İnsanlar gördüm üstünde elbise yok;
Nice elbiseler gördüm içinde insan yok.
Nice elbiseler gördüm içinde insan yok.