FilemakerTurk, AYS Bilişim ve Beyaz.net tarafından desteklenmektedir.
Filemakerturk.com a Hoş geldiniz.

Mehmet KAYA
 0532 231 07 27
						
Filemaker Lisans İhtiyacınız için FilemakerTürk Yönetimi ile iletişime geçin
 
Alakalı Siteler:

AYS Bilişim


Cabitaş


Göksel Gökçe

 

Zeno Paradoxu ve Plank uzunluğu..

+2 oy
76 kez görüntülendi
S.a. Herkese iyi akşamlar diliyorum.

Herhangi bir uzunluğu her defasında 2 ye bölerek (Çıkan Sonuç 2 ye bölünecek; Örneğin 5/2=2,5 -- 2,5/2 şeklinde gidecek) Plank uzunluğu olan 1,61622837 * 10 üzeri - 35 den küçük veya eşit olunca durmasını istediğimiz bir döngüye ihtiyacım var..

Oğlum Fen Lisesinde ve bir proje için kullanacaklarmış. Benden algoritma istedi, ama benim matematiğim buna yetmedi...

 

Şimdiden çok çok teşekkür ederim..
10, Ocak, 10 Scripts kategorisinde Fatih Baştürk (20,920 puan) tarafından soruldu

1 cevap

+2 oy
 
En İyi Cevap
While ( 

   // degiskenler
   [ 
      ~sayi = 10500 ;
      ~sonuc = ~sayi;
      ~bolen = 2 ; 
      ~min = SetPrecision ( 1,61622837 * 10^-35 ; 400 ) ;
      ~iterasyon = 0  
   ] ;

   // loop kalma koşulu
   ~sonuc > ~min ; 

   // döngü
   [ 
     ~sonuc = SetPrecision ( ~sonuc / ~bolen ; 400 ) ;
     ~iterasyon = ~iterasyon + 1
   ] ; 

   ~sayi & " sayısı¶" & ~iterasyon & " kez¶" & ~bolen & " sayısına bölünerek¶" & ~sonuc & " sayısına ulaşıldı"

)
 
Fatih Hocam'ın dosyasını da ekliyorum; 
http://filemakerturk.com/?qa=blob&qa_blobid=6775069795944205384
10, Ocak, 10 F. Osman Cabi (164,290 puan) tarafından cevaplandı
10, Ocak, 10 F. Osman Cabi tarafından düzenlendi
...