Kadın - Erkek populasyon simülasyonu - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

CoCoRiCo · 05 Mart 2016, 18:50

Belki merak edeniniz olmuştur.. Dünyada savaşlar hastalıklar vb. bir çok olay olmasına rağmen, kadın ve Erkekler'in nufusnu kontrol
eden bir insan yapımı yada başka mekanizma yok.
Bu populasyonun kadın - erkek nufuslarının birbirine oranı çok yakın..
Bende bunu bilgisayarda simüle etmek istedim..

Bu iş için de 1-50'ye kadar olan ve 50'den - 100'e kadar sayıları kadın ve erkek olarak ayırdım..
kod, Rastgele 50 ve 50 den büyük sayıları üreterek sonuçların bir ortalamasını alıyor.. ve birbirine oranını kontrol ediyor, bu işlemi
milyar/1 ölçekli oranla (7 milyar ise 70) sınıyor.. ortaya ilgiç bir sonuç çıkıyor..
örnek:
eğer Dünya nufusu 7500 olsaydı
/Wpop 7500

Kod: Kodu kopyalamak için üzerine çift tıklayın!

alias wpop {
  if $regex($1,/\d+/) { 
    var %w $1 | while (%w) { var %i $rand(1,100) | $iif(%i <= 50,inc -u %k,inc -u %e) | dec %w }
    while %w < 100 { var -u %b $calc(%b + $calc(($sorttok(%k - %e,45,nr))/ %e * 100)) | inc %w }
    echo Erkek: %e Kadın. %k Oran: $(%) $+ $calc(%b / 100 )
  }
}

iyi eğlenceler..

joker19 · 01 Mart 2018, 19:45

tskler emeqinize sağlık

YouMyCure · 27 Temmuz 2018, 21:22

değişik bir bakış açısı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
teşekkürler

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Dört At Problemi ve Simülasyonu	Swat	C ve C++	0	11 Temmuz 2014 10:26
Seri Çarpma Devresi ve Simülasyonu	Swat	C ve C++	0	11 Temmuz 2014 10:22
Erkek Erkektir,Kadın da Kadın	aLdiana	Genel İslami Konular	0	21 Mart 2010 00:46

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.