T.C Kimlik Numarası Araştırması

[Depressive]

Evet arkadaşlar bir araştırma anketi yapıyorumda.

 

T.C. kimlik nonuzun son hanesindeki rakamı belirtirseniz çok makbule geçer.

 

Bu arada nedenini bilmediğim bir sebepten dolayı son hane kimsenin tek değil.

 

Bu son hanenin tek olmamasını belirledikten sonra acaba diğer rakamlarda bir yığılma var mı araştırması yapıyorumda.

 

Yardımcı olursanız çok makbule geçer

 

dip not:

Son hanenin neden tek olmadığını bilen varsa açıklama getirirse daha mesut olacağım.

[Firdevs]

ilginç benimde çift

[Lighthouse]

http://scud.theturkhost.net/atatckimlik.jpg

 

 

evet. hepsi çift galiba.

[Depressive]

ya aslında bi araştırma peşindeyimde bugun dikkatimi cekti :D

[mistik]

Şöyle bir bilgiye ulaştım, doğruluğunu bilemiyorum ama mantıklı:

 

aslında tc kimlik numaraları 11 hane değil 9 hanedir

son 2 hane sadece güvenlik gerekçesiyle oluşturulmuştur.

bu son iki hane diğer 9 hanenin güvenlik numarasıdır. ve bu güvenlik algoritması da ona göre oluşturulmuştur.

[Depressive]

peki son 2 güvenlik hanesinin sonu neden cift :S

[Firdevs]

son çift sayı eğer mistiğin dediği gibiyse evet çift ama benim 9. numaram tek sayı 3

[mistik]

tek olsa neden tek diyecektik:) son iki rakam güvenlik kodu ise ilk 9 önemli demektir ve güvenlik kodunun son basamağı belki hesap türünde kolaylık sağladığından hep çifttir...ama bildiğim kadarıyla herkesin çiftmiş, tek olan yok sanıyorum bu da belirli bir sistem olduğunu gösteriyor.

[Depressive]

evet yeni bir tespitte bulunuyorum...

 

son haneniz dışındaki sayıları toplayıp

mod 10 unu alırsanız son haneyi veriyor...

 

ancak neden diğer rakamlar toplamları tek çıkmıyor onun üzerine gidiyorum şimdi de

[BLoodGod]

Benimkide çift merak ettim şimdi

[Firdevs]

sen bi git gel depress bize de anlat

[Rimmon-ex]

Basit bir soru sorabilir miyim?

Neden?

[Depressive]

bugun öyle kimliklere bakıodum dikkatimi cekti..

[mistik]

TC Kimlik numarası format doğrulama fonksiyonu diye bir şey varmış, geçerli bir numara mı yoksa değil mi sayısal olarak tespitine yönelik bir numaralandırma sistemi var demek ki. Bu fonksiyonun delphiye dönüştürülmüş halini buldum, pek anladığım bir dil değil ama sanırım açıklayıcı olacaktır.

 

Kod:

Function checkTCId(tcId: String):Boolean;

Var

tmp, tmp1,

odd_sum, even_sum,

ChkDigit2, ChkDigit1,

total : Int64;

d : Array[01..11] of Int64;

n : Integer;

begin

if Length(tcId) 11 then Result := False

else

begin

tmp := Trunc(StrToInt64(tcId) / 100);

tmp1 := Trunc(StrToInt64(tcId) / 100);

for n := 1 to 9 do

begin

d[n] := tmp1 mod 10;

tmp1 := Trunc(tmp1 / 10);

end;

odd_sum := d[9]+d[7]+d[5]+d[3]+d[1];

even_sum := d[8]+d[6]+d[4]+d[2];

total := (odd_sum * 3) + even_sum;

ChkDigit1 := (10 - (total mod 10)) mod 10;

odd_sum := ChkDigit1+d[8]+d[6]+d[4]+d[2];

even_sum := d[9]+d[7]+d[5]+d[3]+d[1];

total := (odd_sum * 3) + even_sum;

ChkDigit2 := (10 - (total mod 10)) mod 10;

tmp := (tmp*100)+(ChkDigit1*10)+ChkDigit2;

if NOT (tmp = StrToInt64(tcId))

then Result := False

else Result := True;

end;

end;

 

 

Kullanımı

Kod:

procedure TForm1.Button1Click(Sender: TObject);

begin

if checkTCId('11025626126') // Örnektir yanlış bir numara..

then ShowMessage('Doğru bir numara')

else ShowMessage('Yanlış numara')

end;

[Depressive]

pascal dili.. ve sadece numara secimine yarar.. eger yanlıs ögrenmediysem..

[mistik]

evet pascal dili ve buradaki TC kimlik nosunu doğrulamaya yarıyor ve entrylere dikkat edersen 1'den 9'a gibi mod10 gibi çiftlerin toplamı, teklerin toplamı gibi komutlar var ve bu komutlar problemi çözmene tam yarar diye düşündüm. (bu komutlara uygun bir numaralandırma sistemi varmış yani)

[sensizim]

hiç dikkatimi cekmemişti ilginç

[matya]

slm ben yeni katılıyorum konu ilgimi çekti. çünkü ben kimlik numaralarının bilinçli olarak belirli ırkların ve kökenlerin ayrımı belli olsun diye devlet tarafından(ya da devlet harici bir el tarafından) belirli bir kodlama sistemi ile hazırlandığını duymuştum. ama fazla bilgim yok. bunu bazı komplo teorisi üreten şahıslarda uydurmuş olabilir. gerçekte olabilir... sonuçta herkez dünyalı ama dimi...

[Depressive]

evet pascal dili ve buradaki TC kimlik nosunu doğrulamaya yarıyor ve entrylere dikkat edersen 1'den 9'a gibi mod10 gibi çiftlerin toplamı, teklerin toplamı gibi komutlar var ve bu komutlar problemi çözmene tam yarar diye düşündüm. (bu komutlara uygun bir numaralandırma sistemi varmış yani)

 

keşke c dilinde olanıda bulsaydın süper olurdu :D pascal dan pek cakmıyorumda.. ama arastırmalarım devam ediyor

[mistik]

c dilinde olanı da vardı, bir bakayım, bulursam eklerim:)

--------------------

c kaynak kodunu bulamadım:(

[Depressive]

cok teşekkür ederim sana

[mistik]

bilgisayar programlama dillerinden hemen hemen hiç anlamadığımı belirteyim bu arada:D

[Depressive]

c dilinde bulursan ben onu programında calıstırır bakarım sorun degil

[Dolunay]

c dili nedir ki ben hiç anlamadım.Ama belli bir sistem olması gerekir heralde yoksa birsürü karışıklıklar olurdu bu tc numaralarında.

[Depressive]

son rakam hariç diger 10 rakamın toplamı neden cift?? hiç tek cıkmıyor ve ben bunu cözemiyorum sinir oldum... ve toplamın mod10 u neden son sayı...