Bu dosya, Sangaku adıyla bilinen geometri problemlerinden dik üçgen içine ardışık kareler yerleştirilmesini hesaplar ve grafikle gösterir. Dik kenar uzunlukları ile kare adedi değiştirildiğinde sonuçlar otomatik güncellenir.
Dosyanın içeriği
- S: Giriş sayfasıdır. Başlıkta "SANGAKU - Dik Üçgen İçerisinde KARELER" yazar. x ekseni üzerindeki dik kenar uzunluğu (F4, varsayılan 12,6), y ekseni üzerindeki dik kenar uzunluğu (F6, varsayılan 5,8) ve kare adedi (varsayılan 5) bu sayfadan girilir. Sayfada kaydırma çubukları ve üçgen grafiği yer alır.
- H: Hesaplama sayfasıdır. "Hesaplama - Uzunluklar ve Yarıçaplar" tablosunda her kare için b ve r değerleri, Kare.1 ile Kare.7 arasındaki sütunlarda x değerleri listelenir. Sayfada ayrıca "Grafik - Üçgen" için nokta koordinatları (A, B, C noktaları ve y değerleri) ve daireler için merkez ile yarıçap bilgileri bulunur.
Kullanılan formüller
- Sıra numaraları, kare adedine
göre üretilir ve adet aşıldığında boş bırakılır:
=IF(n>=1,1,"")
- INDEX ile bn ve rn adlı tanımlı adlardan ilgili sıradaki uzunluk ve yarıçap değerleri çekilir; IFERROR ve NA ile geçersiz değerler grafikte çizilmeyecek biçimde işlenir.
- Tanımlı adlar (a, b, bn, an, C01.x, C01.y gibi) kenar uzunluklarından kare ölçülerini ve daire çizim noktalarını hesaplar; çizimde SIN, COS ve PI kullanılır.
- MATCH, TREND, OFFSET ve CHOOSE fonksiyonları sıralama ve ara değer hesaplarında kullanılır.
Makrolar
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Makrolar S sayfasının kodunda yer alır ve kaydırma çubuklarını hücrelerle eşler:- aBar çubuğu değiştirildiğinde veya kaydırıldığında değerin onda biri a hücresine yazılır.
- bBar çubuğu aynı şekilde b hücresini günceller.
- nBar çubuğu kare adedi olan n hücresini günceller.
- Worksheet_Change, hücreye elle değer girildiğinde kontrol yapar: a için 2 ile 17, b için 0,5 ile 8, n için 0 ile 7 aralığı kabul edilir ve çubuk buna göre ayarlanır. Aralık dışı veya sayısal olmayan değer girilirse çubuktaki önceki değer geri yazılır.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- S sayfasında x ve y eksenindeki dik kenar uzunluklarını kaydırma çubuklarıyla ya da hücrelere doğrudan yazarak belirleyin.
- Kare adedini 0 ile 7 arasında seçin.
- Üçgen grafiğindeki kareleri izleyin; ayrıntılı b, r ve x değerleri için H sayfasına bakın.