Satranç Tahtasındaki Sır

Katılım
7 Aralık 2015
Mesajlar
2
Excel Vers. ve Dili
2010
Bugün satranç diye bildiğimiz oyunu kurgulayan bilgin, oyunu Pers Kralı’na sunduğunda çok memnun olan kral, “Dile benden, ne dilersen” demiş. Bilgin kendisine uzatılan hazine dairesinin anahtarını elinin tersiyle itip, kraldan satranç tahtasının sol alt köşesindeki kareye bir buğday tanesi koymasını ve sonra her kareye bir önceki karenin iki katı buğday tanesi koymasını ve bu şekilde 64. kareye kadar gitmesini istemiş. “Bana bu kadar buğday verseniz yeter.” demiş. Zenginliğinden gurur duyan kral, tebessümle, bilginin alçak gönüllülüğünü övüp, vezirine “Dileği, yerine getirin” diye emir vermiş.
1+2+4+8… şeklinde her yeni terimin bir önceki terimin iki katı olarak arttığı bir dizinin ilk 64 teriminin toplamını bulan ve ekrana yazdıran bir C programı yazınız.Programınızda while döngüsü kullanınız.
 

Merhum İdris SERDAR

Moderatör
Yönetici
Katılım
21 Ekim 2005
Mesajlar
17,094
Excel Vers. ve Dili
Excel, 365 - İngilizce
.

C'yi bilmem ama Excel'de:

Kod:
=POWER(2;64)-1
veya;

Kod:
=2^64-1

işinize yarar mı?


.
 

ÖmerBey

Destek Ekibi
Destek Ekibi
Katılım
22 Ekim 2012
Mesajlar
4,340
Excel Vers. ve Dili
2007 Türkçe
Merhaba,
Fikir vermesi saçısından:
Kod:
Sub Kod()
üs = 0
Do
    kare = 2 ^ üs
    toplam = toplam + kare
    üs = üs + 1
Loop While üs < 64
MsgBox Format(toplam, "0")
End Sub
Kod:
Sub Kod()
üs = 0
Do While üs < 64
    kare = 2 ^ üs
    toplam = toplam + kare
    üs = üs + 1
Loop
MsgBox Format(toplam, "0")
End Sub
 
Son düzenleme:
Üst